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JEUX EPSON HX 20 

__— ÉDUCATION Un système compact 
GESTION clavier écran 690€ 
BUREAUTIQUE LCD avec impnmante 


Micro K 7 


Extension 16 K 





EPSON 
Imprimantes 
pression.interiace parallèle type Cen- 


de haute qualité d'm- 





6 800€] 
MX 100 : 100 cps. 132 caractères 
ou 233 compressés (8200F 





APPIE II 


Le plus populaire des micro-ordina- 
teurs. 48 K RAM. Basic Applesoft. Una 
gamme incomparable de logiciels et 
d'accessoires. 
Applell+ 48K + Diskavec Contrôleur 
+ Moniteur 12" 





APPLE II 


L'outil professionnel par excellence 
128 Ko ou 256 Ko. Unité de disque 
ncorporée. Sortie RS 232. Nombreux 
interfaces disponibles. Adjonction 
possible d'un disque dur de 5 méga. 
Profilé. Ecran vert haute résolution 
antireflets. Clavier Azerty - Qwerty. 


Nous consulter secs) 





SHARP PC 1500 

Ordinateur de poche de 185 Ko de 
mémoire vive extensible avec module 
de8KCE 155 

CE 150 

Mini table traçante 4 couleurs directe- 
ment connecteble sur PC 1500, Inter- 


face K 7 incorporé. 
so (4100E 
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Editorial 





L'année scolaire qui débute sera l'occasion de développements importants dans le domaine de la 
micro-informatique. Nous en avons déjà parlé dans le demier éditorial, mais nous devrions voir apparaître en 
septembre les premiers matériels IBM PC et de la série Digital réellement disponibles à la vente. Les Sirius 
devraient uoir leur logiciel s'enrichir. Pour nous, utilisateurs de matériels Apple, ITT, Silex et autres, les 
nouveautés sont les périphériques, le développement de la communication, des réseaux de toutes sortes et, 
bien sûr, l'apparition de programmes toujours plus variés et aux possibilités multiples. 


Nous entamons avec ce cinquième numéro de Pom's la deuxième année de notre revue. La première 
année s’est passée de façon satisfaisante : nous sommes maintenant quasiment en rupture de stock pour 
chacun des quatre premiers numéros, et nous venons d'augmenter le tirage de Pom's, passant ainsi de 3 000 à 
4 000 exemplaires par numéro. La seule chose qui a freiné notre développement a été le refus de la part de 
l'administration française de nous reconnaître comme revue de presse, en nous accordant l'accord de la 
Commission Paritaire des Publications de Presse. On reproche à Pom's d'être, soi-disant, une revue 
publicitaire pour Apple ; la conséquence principale étant que nos frais sont ainsi majorés, par le jeu de la TVA 
et des frais postaux, de 30 %. 


Nous continuons par conséquent à travailler avec des moyens relativement simples, mais faisons tout notre 
possible pour vous offrir une revue de qualité, sinon de présentation totalernent professionnelle. À en croire la 
croissance des ventes de Pom's, le temps énorme que nous consacrons à Pom's n’est pas perdu. Nous en 
sommes heureux et espérons que Pom's continuera d'être pour vous un moven de communication, 
d'apprentissage et de découverte. 


Nous vous offrons dans ce numéro une contribution qui est en fait, vu sa richesse, un produit valant 
largement de nombreux logiciels commerciaux. HAIFA, le Herz Amper Interpreter For Applesoft, étendra les 
possibilités de programmation de votre Apple, en particulier dans les domaines graphique et sonore. Le 
programme est tellement important que nous n'avons pu mettre le source (Lisa 2.5) sur la disquette 
d'accompagnement. Ce code source occupant plus de 150 secteurs, nous n'avons pu non plus le lister dans la 
revue : nous imaginons mal que quelqu'un tienne absolument à rentrer plus de quatre pages pleines, ne 
serait-ce que pour le code hexa ! La disquette comporte par conséquent la version binaire de HAIFA, et des 
programmes de démonstration, sous forme de générique pour Pom's. Les codes sources des versions 48K et 
64K pourront être commandés sur une disquette spéciale vendue en option, au prix habituel de 50 
francs TTC. 


Nous vous offrons aussi une analyse des bases de données réalisée par J.-F. Duvivier, un clavier rnagique et 
un amper-interpréteur (plus simple que celui de Herz) dûs à Denis Sureau, un banc-test du programme 
CX-Multigestion et de la carte Legend 128K DE. Les fans de Pascal trouveront encore dans cet exemplaire une 
excellente contribution de Michel Crimont, qui s'attaque ici à la création de formes. 


Nous recevons de plus en plus de contributions de lecteurs, et n'avons d'ailleurs pas pu toutes les intégrer 
dans cet exemplaire. Nous rappelons aux lecteurs qu'ils peuvent nous envoyer leurs contributions sur 
disquette. Quand cela est possible, nous préférons recevoir le texte sur la disquette en format Apple Writer I ou 
Il. 


Directeur de la publication — rédacteur en chef : Hervé Thiriez — Siège social : Editions MEV — 49, rue Lamartine — 
78000 Versailles — Rédaction et abonnements : 59, bd de Glatigny — 78000 Versailles — Tél. (3) 918.13.07 — Régie 
publicitaire : Force 7 — 41, rue de la Grange-aux-Belles — 75483 Paris Cedex 10 — Tél. (1) 238.66.10 — Diffusion 
auprès des boutiques informatiques et librairies : Editions du PSI — 41-51, rue Jacquard — B.P. 86 — Tél. (6) 007.59.31. 


Ont collaboré à ce numéro : Christian Colmant, Michel Crimont, Jean-François Duvivier, Olivier Herz, Denis Sureau, 
Hervé Thiriez — Conseillers techniques : Olivier Herz et Gérard Michel — Dessins : Bertrand Delestrée et Jean Mourot. 
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Le clavier magique 


Denis Sureau 





Ce programme utilitaire permet de donner à 
l'Apple une possibilité que l'on trouve d'o- 
rigine sur le PET et qui facilite grandement 
l'entrée d'un programme BASIC au clavier : 
une seule lettre est tapée, associée à la 
touche CTRL et une instruction Applesoft 
apparait sur l'écran : ainsi, CTRL-I rempla- 
cera INPUT, CTRL-T THEN, etc... 


frappe d'un programme, {Âche 
fastidieuse s'il en est, soil encore facili- 
tée, l'autonumérotation est permise par le 
programme: il suffit d'appuyer sur la barre 


Pour que la 


d'espacement pour que le numéro de ligne 
suivant apparaisse avec à sa droite Je 
curseur... 


Le listing du programme donne toutes les 
indications nécessaires sur son fonctionne- 
ment; il est relativement court car il se 
sert de la table des instructions Applesoft, 
commençant à partir de l'adresse $DOCO, grâce 
ë une table d'adresses donnant la 
correspondance entre Îles lettres À à Z et 22 
instructions Applesofl. Les touches CTRL-U, 
CTRL-H, CTRI.-M et CTRL-X ne sont pas 
affectées, CTRL-M équivaut à RETURN pour le 
moniteur. 


Lorsqu'on le charge, le programme est 
inactif. On le rend actif par CTRL-SHIFT-P et 
l'on peut ensuite, même à l'interieur d'une 
ligne, le déconnecter ou le reconnecter avec 


LO TEXT ? HOME 

20 HTAË 10 FRINT "LE CLAVIER Mñ 
GIQUE" 

30 PRINT : FRINT 

40 FRINT ‘" CET:UTILITAIRE EN ASS 
EMELEUR FERMET" 

50 FRINT "D’ECRIRE LES INSTRUCTTI 
ONS AFFLESOFT AU" 

60 PRINT "MOYEN DE DEUX TOUCHES: 


cette commande. 


Quand au numéro de départ de la numérota- 
tion automatique et à l'incrément, ils sont 
définis par l'instruction & [DEPART], ['INCRE- 
MENT]. Par défaut, le numéro de départ est 
100 ct l'incrément 10. 

On pourra également obtenir la commande 
LIST avec la touche “/" et CATALOG avec la 
touche "$!!, mais seulement en exécution di- 
recte. 

La correspondance des touches de contrôle 
sgt la suivante : 
Touche Equivalent { Touche Equivalent 

A INVERSE ! 0 HPLOT 

B HTAB ! P HOME 

C COLOR ! Q POKE 

D DATA ! R RETURN 

E TEXT ! 5 SCALE 

F FOR ! 4 THEN 

G GOTO ! V VTAB 

L INPUT ! W PEEK 

J GOSUB ! Y XDRAW 

K VLIN | Z NORMAL 

L HLIN ! CTRL SHIFT M XDRAW 

N NEXT ! 

Bascule pour brancher ou débrancher le cla- 


vier magique : CTRL-SHIFT-P, 


TATION ET L'’INCREMENT SONT D 
ONNES 

140 FRINT “FAR L'’INSTRUCTION: ‘"; 
t INVERSE ? PRINT "&“DEF:,4T 

NORMAL 

150 FRINT " ON MET LE FROCRAM 
ME EN FONCTION ET" 

160 FRINT "ON FEUT -A TOUT MOMEN 
T- LE METTRE HORS" 

170 FRINT "FONCTION FAR LA COMMA 


70 PRINT “ - LA TOUCHE CTRL NDE :" 
TERE DE À À Z" TRL-8 ": NORMAL 
90 FRINT "  NORMALEMENT L’INITI 190 IF PEEK (11S9 + PEEK C1) 
ALE DE L’INS- “+ PRINT " x 256 « 22000 THEN 300 
TRUCTION," 200 FRINT CHR$ (4)"ERUN MAGIQS 
100 FRINT " DE FLUS ON OBTIEN 6000" 
T AUTOMATIQUEMENT" 210 CALL 24576 
110 FRINT "LE NUMERO DE LA LIGNE 220 END 
SUIVANTE EN" 300 FRINT CHR$ (4)"ERUN MACIQ$3 
120 FRINT "AFFUYANT SUR LA BARRE A00" 
D’ESFACE.," 310 CALL 14848 
130 PRINT ‘ LE NUMERO DE DEFAR 320 END 
T DE L’'AUTONUMERO-"? PRINT 
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0800 L'OHRRRRERRERERRRRERERERERE 

0800 2 PR & 

0800 3  j8 L E ë& 

0600 4 38 & 

0800 5 8 CGCLÉAUNTEER & 

0600 6 ;& ë. 

0800 7 86 MAGIQUE & 

0800 i& & 

0800 7 38 FAR ë& 

0800 10 ;& DENTS GUREALU & 

0800 11 5& & 

0800 £  PRRRRRERERRRRERRERRRER 

0800 13 ; 

0800 14  HOUK EFZ #38 

0800 15 KEYIN EQGU #FDIE 

0800 lé FRINT EQU $FDED 

0800 17  INLINE EQU #DS2E 

0800 18 FRMNUM EQU #DDé67 

0800 19 LINNUM EFZ #50 

0800 2 CHRGET EFZ $E1 

0800 21 TXTFTR EFZ #68 

0800 22 GETADR EQU #E75% 

0800 23  INCH EFZ #16 

0800 24  INCL EPZ ‘+1? 

0800 23  NUML EFZ #%1AÂ 

0800 26  NUMH EFZ +1 

0800 27 FASSE EFZ #1C :0=0FF,1=0N 
0800 28 LINFTR EQU $ED24 

0800 29 FELLZ EQU $F6E4 

0800 30 HAIT EQU #FCAS 

0800 31 ; 

4000 32 ORG $6000 

6000 33 OEJ #800 

6000 34  ; 

6000 39 $ (LONGUEUR: #1CE) 

6000 36 

6000 37 INIT;: 

6000 À923 38 LDA #TESTS #FLACE UN 
6002 68538 39 STA HOOK SAUT À 
6004 ÀA9760 40 LDA /TESTS 5L' ADRESSE TESTS 
6006 8539 41 STA HOOK+1 #DANS LE ?’INFUT HOOK’ 
6008 A900 42 LDA +400 

600À 851FE 43 STA NUMH 

600C 8518 44 STA INCH 

600E 851C 45 STA FASSE 

6010 À964 46 LDA #$64 

6012 851 47 STÀ NUML 

6014 A90DA 48 LDA 4#$#04À 

6016 8519 49 STA INCL 

6018 A900 50 LDA ÆINIT 

6014 8573 51 STA 473 

601C À9760 92 LDA /INIT 

é01E 8574 33 GTA #74 

6020 4CEA03 54 JMF $3EÀ 

6023 Jo TESTS: 

6023 201EFD 36 JSK KEYIN LECTURE CLAVIER 
6026 C980 37 CMF #$60 ?CTRL-0? 
6028 D003 38 BNE TSTI 

602A 4CE860 59 UMF MAGIQ 

602D 48 60 TSTI FHA 
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G0ZE ASIC éi LDA FASSE ?ON-0FF® 


6020 D00? 62 ENE TSTZ 
6032 68 63 FLA 
6033 60 64 RTS 
6034 68 65 TST2  FLA 
6035 C99E 66 CMF #99E TEST CLAVIER 
6037 901E 67 ECC CTRL TOUCHE DE CONTROLE? 
6039 E000 68 CFX #$00 
603E DO16 69 ÊNE RTS 
603D C9A0 70 CMF #$A0 EARRE D'ESFACE? 
603F F050 pi ÉER NUM 
6041 C943 72 CMF #"#" 
6043 F073 73 ÉEQ FAKRAM 
6045 C7A4 74 CUF 4"#$" 
6047 D003 75 ÊNE TST3 
6049 4CA261 76 JMF CATALG 
604C C9AF 77 TST3  CMF #"/" 
804€ D003 78 NE RTS 
6050 4CAA6I 79 UMEF LIST 
6053 60 80 RTS RTS 
6054 81 CTRL! 
6054 C98D 8? CMF +##$8D RETURN? 
6056 FOFE 83 BEQ RTS 
6058 C988 84 CMP 4688 :FLECHE GAUCHE? 
6054 FO0F7 85 ÉEQ RTS 
605C C9795 86 CMF #495 :FLECHE DROITE? 
605E F0F3 87 ÉEQ RTS 
6060 C998 88 CMF #$98 :CTRL-X? 
6062 FO0EF 89 CEQ RTS 
6064 C99E 90 CMF #49E ESC 
6066 FO0EE g1 HER RTS 
6068 92 3 
4048 93 + CETTE FROCEDURE SELECTIONNE 
6068 94 DANS LA TABLE DU FROGRAMME 
| 6068 95 $L'ADRESSE DE L’INSTRUCTION 
6068 96 ?VOULUF DANS LA TABLE DE 
6068 97 $L'AFFLESOFT, 
6068 98 ? 
6068 D8 99 CLD 
6069 297F 100 AND 4#37F A=4-128 
606E DA 101 ASL *A=Ax? 
606C AB 102 TAY 
| 606D E94F61 103 LDA TABLE», Y 
| 6070 FO01E 104 EG EXIT :SI 0000,S0RTIE 
| 6072 8D7F60 105 STA ADRESS+2Z 
6075 E95061 106 LDA TABLE+19Y 
6078 8D7E60 107 STA ADRESS+1 
| 607E: 108 INSTR! 
| 607E A000 109 LDY #300 
607D E9FFFF 110 ADRESS LDA #FFFF,Y 
6080 C980 111 CMF #580 DERNIER CARACTERE? 
| 6082 100€ 112 ÉFL EXIT 
6084 113 AFFICHAGE ET INSERTION DE CHAQUE 
6084 114 CARACTÈRE DANS LE BUFFER D'ENTRÉE 
6084 0980 115 ORâ +#+#80 
6086 20EDFD 116 JSR FRINT 
6089 9D0002 117 STA #200,X 
608C E8 118 INX 
608D C8 119 INY 
608E D0ED 120 NE ADRESS 
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6090 60 121 EXIT RTS 


6091 122 

60971 RS a NS ML 

6091 124 ; AUTONUM 

6091 DA ÉRRSEST nn es 

60971 126 AFFICHE LE NUMERO DE LIGNE 

6091 127 NUM: 

601 Aé6lA 128 LDX NUML. 

6093 ASIE 129 LDA NUMH 

6095 2024ED 130 JSR LINFTR 

6098 AO01 131 LDY #01 

607À 132  $INSERTION DANS LE EUFFER D'ENTRÉE 
à 609 133 NUMZ: 

609A F128 134 LDA (C528),Y 

609C C7A0 135 CMF ##A0 

609E F007 136 EEQ NUM3 

6040 7D0002 137 STA $200,X 

6043 C8 138 INY 

6044 E8 139 INX 

60ÀS D0F3 140 ENE NUMZ 

60A7 141  ; 

6047 142  $INCREMENT DU NUMERO SUIVANT 

60À7 143 NUMS: 

60A7 D8 144 CLD 

60A8 18 145 CLC 

60À9 ÀS519 146 LDA INCL 

é0AE 651À 147 ADC NUML 

60AÀD 851Â 148 STA NUML 

60ÀF AS18 147 LDA INCH 

601 651E 150 ADC NUMH 

60E3 851E 151 STA NUMH 

60Ë5 A7AO 152 LDA 4#40 

60E7 60 153 RTS 

60E8 LYT 3 

6058 155 ENTREE DES NUMERO DE DEFART & INC, 

6088 156 FARAM: 

60E8 AA 157 TAX 

60E7 Cé24 158 DEC #24 

60EE 202ED5 159 JSK ZINLINZ ENTREE 

60BE A900 160 LDA #$00 #*D'UNE LIGNE 

60C0 85E8 léi STA TXTFTR 

60C2 A4902 162 LDA #$02 

60C4 8569 163 STA TXTFTR+I 

60Cé 2067DD 164 JSK FRMNUM ; EVALUATION 

60C9 2052E7 165 JSR GETADK 

60CC ASS1 léé LDA LINNUM+1 

60CE À450 167 LDY LINNUM 

6000 851F 168 STA NUMH 

60D2 841 lé? STY NUML 

60D4 20E100 170 JSK CHKGET 

60D7 2067DD 171 JSK FRMNUM 

60DÀ 2052E7 172 JSK GETADK 

60DD A450 173 LDY LINNUM 

60DF A551 174 LDA LINNUM+1 

60E1 8518 175 STA INCH 

60E3 8419 176 STY INCL 

60ES5 A98D 177 LDA 4##8D 

60E7 60 178 RTS 

60E8 17% 3 

60E8 180 ÿ ROUTINES D’AFFICHAGE DU TITRE 
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8606 
ASZ4 
6508 


A525 


8509 
AS1C 
D048 


8606 
AÇ0U 
8525 
8524 
Z022FC 
A20E 
2044F9 
AUO0 
98H61 


Z0E4FE 
ASA 0 
4606 
D002 
A98D 
60 


A000 
8424 
8425 
2022FC 
209CFC 
A700 
401761 


0000D1 
4FD125 


5 D110 


DODADO 
EFDOD3 
D193 

0000D0 
DED1A4 
D105 

Di0100 


233 


234 


TITRE: 


T2 


RTSTT 


RTSTT2 
EFFÂCE à 


TABLE 


HEX 


HEX 


 $FCZZ 


 FRINT 


EFFACE. 


$é 
#00 
$25 


$24 


4 OE: 
$F94À 
400 

à és 6 


#+$8D 


KTSTTZ 
#+48D 


#40 0 
+24 
+25 
$FC22 
$FC9C 
#$00 
RTSTT 


0000D14FD125D110 


DODADOEFDOD3D193 


0000D0DEDIA4D105 


D1010000D0D6D117 
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; CONSERVATION 
DES VTAE 

ET HTÂE 

3 INITIAUX 











00D0Dé 
D117 
Di29D1 
C7D1A9 
D131 
DiEF00 
00N144 
D23E 
0000D1 
1CD149 
0000 
0000D1 
20 

‘ 3AZ00C 
052003 
0C0iié 


CCC9D3 
D4 
00 


EE — 


FJ 
Co 
ci 





HEX D129D1C7D1A7D131 
HEX DiEF0000D164D23FE 
HEX 0000D11CD1450000 
HEX 0000D120 
T INV "$ LE CLAVIER MAGIQUE 5" 
HEX 8D 
; 
ÿ? TOUTE COMMANDE FEUT ETRE 
ÿ AJOUTEE AVEC LA KOUTINE 
ÿ ‘COMM’ EN AJOUTANT CETTE 
? COMMANDE À LA LISTE ’LST’ 
; ON DONNE À Y LA FLACE DU 
ÿ FREMIER CARACTERE DE LA 
ÿ? COMMANDE ET ON ERANCHE SUR 
ÿ: COMM €CY DE 0 À 254) 
5 ON AJOUTE UN TEST EN DEEUT 
; DU FROCRAMME, 
ÿ COMME AVEC CATALOG CI-DESSOUS: 
; 
H en en cie er nn near see eue prt ins Se 
ÿ CATALOG 
H Re CS SLT SRE NE NE eur 
CATALGE LDY #405 
USK COMM 
LDA #$6D 
RTS 
+ oud ons ons mire eur oste dons hits sine oûe éois Less 'alet doné dons pod ons débe- cet 
; EL LOT 
; que: déviepré ape nest et omeiern tune La één st den étse dent dt tire 
LIST LDY ##00 
COMM LDX 4#+$00 
LLOOF  LDA LST,Y 
ENE LLOOFZ 
LDA #+$A0 
RTS 
LLOOFZ JSK FKRINT 
STA #200,X 
INX 
INY 
ENE LLOOF | 61C5 C3C1D4 278 
; 6iC8 C1iCCCF 
LST ASC "LIST'"'| 61CE C7 
61CC 00 279 
HEX 00 280 
Pom's n° 5 


FIN 


ASC 


"CATALOG" 


HEX 00 
END 





Récapitulation 48K 


6000- À7 23 85 38 À7 60 85 39 
6008- A9 00 85 1EF 85 18 85 1C 
6010- À7 64 85 14 A9 0À 85 19 
6018- À7 00 85 73 À7 60 85 74 
6020- 4C E4 03 20 1E FD C9 80 
6028- D0 03 40 E8 60 48 AS 1C 
6030- D0 02 66 60 68 C9 9E 90 
6038- 15 E0 00 D9 14 C9 À0 F0 
6040- 50 C9 À3 F0 73 C9 À4 DO 
6048- 03 4C A2 61 C9 ÀF DO 03 
6050- 4C AÀ 61 60 C9 8D F0 FE 
6096- C9? 68 F0 F7 C7 975 FU F3 
6060- C9 98 F0 EF C9 9& F0 EB 
6068- D8 29 7F 04 A8 E9 4F 461 
6070- F0 iE 8D 7F 60 E9 50 61 
par 6078- 8D 7E 60 A0 00 E9 FF FF 

ee 6080- C9 80 10 0C 09 80 20 ED 
6088- FD 9D 00 02 E8 C8 D0 ED 
6090- 60 Âé 1ÂA ÀS 1E 20 24 ED 


CARTE AMPAIIERS 6502 6098- A0 01 À 28 C9 À0 F0 07 


60À0- 9D 00 02 C8 ES DO F3 D8 


LE SYSTEME D'EXPLOITATION 60AB- 18 AS 19 65 14 85 1A AS 


60E0- 18 65 1E 85 1E A9 A0 60 
DU 6502 - MONOPOSTE/MULTIPOSTE &0E8- A4 Cé 24 20 ?2E DS A9 00 
° POUR UNE PROGRAMMATION SIMPLIFIEE 60C0- 83 E8 A9 02 85 E9 20 67 


_ 7 = ter LE Li L 
+ POUR DIVISER PAR 20 LA LONGUEUR GOCSARPT ED 92 E7 4S 51 A4 50 
DE VOS PROGRAMMES 60D0- 85 15 94 14 20 E1 00 20 


60D8- 67 DD 20 52 E7 A4 50 A5 


+ POUR GERER DES MEMOIRES DE 140 K 60E0- 51 85 15 84 19 A9 ED 610 
À 120 MEGAS 60E8- 86 06 AS 24 05 09 AS 25 
* POUR GERER VOS FICHIERS SEQUENTIELS &0F0- 85 09 AS 1C DO 48 84 064 
INDEXES MULTICLES 60F8- A9 00 85 25 85 24 20 22 
+ POUR GERER VOTRE ECRAN PAR MASQUES &100- FC AZ 0E 20 44 F9 A0 00 
DE SAISIE (ADAPTABLE AUX CARTES 80 COLONNES) 2 ES DR 41 LH 20 ED ED Co 
+ POUR GERER VOTRE IMPRIMANTE PAR 6110- BD DO F5 À6 06 A9 01 85 
MASQUES D'IMPRESSION 6119- 22 85 1C A5 08 05 24 AS 

LA VERSION MULTIPOSTE VOUS ASSURE : É 6120- 09 85 25 720 27 FC A0 ?90 

- LA MISE EN COMMUN TOTALE 6128- 20 E4 FE À9 DO 20 A8 FC 

DES RESSOURCES SANS GOMFLIT 6130- A0 19 20 E4 FE A9 A0 A6 


6138- 06 DO 02 A9 8D 60 A0 00 
6140- 84 24 84 25 20 27 FC 20 
6148- 9C FC A9 00 4C 17 é6i 00 
6150- 00 Di 4F Di 25 Di 10 DO 
6158- DA DO EF DO D3 Di 93 00 
pee 6160- 00 DO DE Di A4 Di 05 Di 

Lacquet UN S &168- 01 00 00 D0 Dé Di 17 Di 
ss: : hé #3 6170- 29 Di C7 D1 A9 Di 31 D1 
— œ 6178- EF 00 00 Di 64 D? 36 00 

ce Ch. fre BP. … 46180- 00 Di 1C Di 49 00 00 00 





ë p.88 hace But REZE CEDEX 6188- 00 D1 20 34 20 0C 05 20 
È SRDNCE, Tan 152280 6190- 03 0C 01 16 09 05 12 20 
S Ta. GA 355 6198- 0D 01 07 09 11 15 05 20 
< 61A0- 34 8D A0 05 20 AC 61 A9 
;. 61AB- 8D 60 AD 00 A2 00 E9 C0 
micro … 61E0- 61 D0 03 A9 A0 60 20 ED 
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Bases de données sur Apple 


Jean-Francois Duvivier 





Il est généralement admis que l'une des 
utilisations les plus populaires d'un or- 
dinateur individuel consiste à stocker des 
données et à pouvoir les retrouver rapide- 
ment. Cela se confirme au vu de l'importance 
et du nombre de programmes de gestion de 
bases de données (ou gestion de fichiers) 
disponibles sur le marché. Au même titre que 
les jeux ou les progiciels de traitement de 
texte, ils constituent une classe tout à fait 
particulière de programmes. 


Leur 
l'arrivée 
disquettes 
en février 
gestion de 
problématique. 
l'ocuvre de 
Call-APPLE, Puis, 


apparition coïncide avec 
sur l'Apple des unités de 
(DOS 3.1 en juillet 1978, DOS 3.2 
1979), tant il est vrai qu'une 
fichier sur cassette était 
Ces premiers essais ont été 
clubs naïissants, tel que 

avec l'apparition des SSCI 
attirées par le succès et la diffusion 
d'Apple, les programmes commerciaux se sont 
multipliés. Avec la concurrence, la qualité 
de ces progiciels s'est améliorée rapidement 
pour déboucher sur des produits tout à fait 
remarquables. 


première 


choisi de vous en 
parmi les meilleurs. 


peut-être pas votre 


présenter quatre 

Vous n'y trouverez 
favori, le seul qui 
trouve grâce à vos yeux, et je vous prie de 
m'excuser d'avance pour cet oubli |! A chacun 
de ces quatre progiciels sont consacrées deux 


J'ai 


à trois pages qui vous permettront de vous 
faire une idée plus précise de leur 
fonctionnement et de leurs possibilités. J'ai 
respecté autant que possible le même 


cheminement tout au long de cette analyse, 
avec des étapes bien définies, afin que vous 
puissiez plus facilement effectuer des 
comparaisons. ux. Enfin, à la suite de ces 
textes, un tableau récapitulatif rassemble 
les principales caractéristiques de ces 
prœiciels. 


trouverez pas à la fin de cet ar- 
ticle une conclusion générale, car il était 
impossible de répondre à la question : "Quel 
est le meilleur ?" ou "Lequel dois-je choisir 
2". Chaque programme a ses avantages et ses 
inconvénients. Le choix dépend surtout de 
l'utilisation qui doit en être faite. En 
guise d'aide, vous pourrez consulter 
l'article paru dans l'Ordinateur Individuel 
d'avril 1982 : "Quelques conseils pour bien 
choisir un progiciel de gestion de fichier", 
article dont je recommande la lecture 
préalable à tous ceux qui n'ont jamais 


Vous ne 


utilisé de programmes de gestion de fichiers 
et qui pourraient être déroutés par les 
termes employés dans cet. article. 


Quelques mots avant de commencer, sur les 
absents. Il s'agit notamment de : 
- !MCX Multigestion", produit. 
fait l'objet d'une analyse 
Hervé Thiriez dans ce numéro. 
- "Data Factory" écrit par Bill Passauer et 
distribué par Micro-Lab (150 $ aux USA). Ce 
produit monte très fort dans les classements 
mensuels publiés par Softalk, mais je n'ai 
pas pu me le procurer à temps. 
- MModifiable Database" (Synergistie Soft- 
ware), programme qui a quelques défenseurs 
acharnés car ses fichiers sont totalement 
accessibles et utilisables en Basic, et à 
cause de sa grande facilité d'utilisation. 
- "Super Généfiche" (Imagol) dont nous at- 
tendons de pouvoir tester la version 
professionnelle. 
- des progiciels exécutés sous CP/M avec la 
carte Z80 (Softcard). Il faut surtout citer 
“"Datastar" (la star des programmes de gestion 
de fichiers sous CP/M) et "Unibase'", Bien 
qu'ils possèdent des qualités évidentes et 
indiscutées, je ne les ai pas fait figurer 
ici pour ne pas rompre "l'homogénéité maté- 
rielle", l'Apple II équipé d'une Softcard 
n'étant plus tout à fait un Apple II... 


français, qui 
détaillée par 


En dernier 
ciements à la société 
très amicalement les 
l'objet de cette étude. 


j'adresse tous mes remer- 
SIDEG qui m'a prêté 
programmes faisant 


lieu, 


CCA DATA MANAGEMENT SYSTEM : 
DE BEAUX RESTES 


UN ANCIEN QUI A 


CCA DMS 
présentés 
remonte à 


est le plus ancien des progiciels 
ici puisque sa première apparition 
1979, date à laquelle le DOS 3.3 
n'existait pas encore ! Distribué par 
Personal Software (si,si ! vous connaissez : 
ils distribuent aussi Visicalc }), ses 
possibilités lui ont vite permis d'acquérir 
une place de choix parmi les programmes de 
l'époque. Présenté sur une disquette normale, 
c'est-à-dire non protégée (1979, c'était la 
belle époque), CCA a connu un vif succès et 
une distribution (...) très large qui lui a 
permis de se retrouver en bonne place dans la 
programmathèque de nombreux utilisateurs 
Apple. 


L'adaptation au DOS 3.3, Muffin oblige, n'a 
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présenté de difficultés. Ayant ainsi 
le temps sans encombres, le CCA DMS 
parmi les programmes de gescion 
de fichiers les plus connus, malgré des 
perf ormances en retrait par rapport aux 
prœiciels plus récents. 


pas 
traversé 
se retrouve 


Conf iguration 


CCA DMS se présente sous forme de six pro- 
grammes Applesoft chaînés entre eux. Il né- 
cessite donc un Apple Il+ ou un Apple équipé 
d'une carte langage ou d'une carte ROM 
Applesoft. Bien qu'il soit exploitable avec 
une seule uiité de disquettes, il est 
souhaitable d'en posséder deux afin d'éviter 
les changements de disquettes rendus 
nécessaires par les overlays. Le CCA DMS 
peut être exécuté en 3.2 comme en 3.3 


Lors de la première utilisation, le pro- 
gramme demande les données relatives à 
l'imprimante (slot ou adresse de la routine, 
données d'initialisation, présence d'un 
retour chariot -line feed- supplémentaire) et 
le nombre d'unités de disquettes. Ces données 
sont stockées dans un fichier CONFIGURATION 
qui vous évitera de rentrer les mêmes 
paramètres à chaque exécution du programme. 
Et il vous suffira de supprimer ce fichier 
pour repasser automatiquement en phase de 
configuration. 


Menu principal 


Il comprend sept fonctions : 


- "Terminate processing" : fin (sauvegarde 
des fichiers et retour au Basic) 

- "Perform file maintenance! : entrée de 
nouvelles données, modification, recher- 
che, suppression...) 

- "Print a report or labels" 
imprimante 

- "Compact a file" : compactage du fichier 

- "Define a file" : définition du fichier 

- "Sort a file" : opérations de tri 

- "Change slot number" : changement de slot 


: sorties sur 


Définition du fichier 


Chaque champ a trois caractéristiques de 
base qui doivent être définies 


- un identificateur (1 à 5 caractères) qui 
sera utilisé dans toutes les opérations 
pour désigner ce champ; 

- un label plus explicite (1 à 15 caractè- 
res) qui sera affiché lors de l'entrée des 
données ou de la sortie sur imprimante; 

- la longueur, qui représente le nombre de 

caractères réservés pour ce champ. 


Chaque champ peut avoir trois types diffé- 
rents : 
- alphanumérique, c'est-à-dire qui accepte 
tous les caractères; 
- numérique (jusqu'à 9 chiffres) auquel cas 
la première lettre de l'identificateur 
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doit être une ‘#!: 

- permanent, c'est-à-dire fixé dès le dé- 
part et non modifiable (intéret 712). La 
première lettre de l'identificateur est 
alors un ‘!?., 


Il est également possible de définir des 
champs calculés à partir des autres champs 
numériques. La formule entrée est évaluée de 
gauche à droite, sans hiérarchie entre les 
opérations, Les parenthèses étant interdites, 
les possibilités d'exploitation des champs 
calculés sont assez réduites. 


La taille maximale autorisée d'un enregis- 
trement est de 232 octets, et le nombre de 
champs par enregistrement est limité à 24. La 
taille totale du fichier ne peut excéder la 
capacité d'une disquette, ce qui le limite à 
140K en DOS 3.3. 


Utilisation du fichier 


L'option 1 du menu général est utilisée 
pour ajouter, modifier ou rechercher un en- 
registrement. La ligne supérieure de l'écran 


moment le nom du fichier, le 
et le 


indique à tout 
numéro de l'enregistrement présenté 
nombre total d'enregistrements. 


L'entrée des données est effectuée ligne 


par ligne, certainement par des instructions 
Basic INPUT, ce qui donne à l'écran une 
présentation peu esthétique. La fonction 


Recherche est vraiment minimale, car elle ne 
permet que la recherche de l'occurence d'une 
chaîne de caractères dans un champ unique. Il 


n'y a donc pas la possibilité de tester les 
valeurs des champs numériques (comparaisons 
de valeurs) ni d'effectuer des recherches 


logiques (ET,OU) sur plusieurs critères. 


La fonction Modification permet de changer 
le contenu d'un champ. Cependant, l'enregis- 
trement à modifier doit être spécifié par son 
numéro, ce qui oblige pratiquement à effec- 
tucr une opération de recherche pour connaî- 
tre le numéro avant chaque modification. 


La fonction Suppression présente une ca- 
ractéristique intéressante : l'enregistre- 
ment supprimé est seulement marqué dans le 
fichier et non pas détruit. Cela permet par 
exemple de pouvoir imprimer tous les 
enregistrements supprimés, ou même de les 
récupérer si le besoin s'en fait sentir ! La 
suppression effective intervient lors du 


compactage du fichier (option 3 du menu). 


Une dernière fonction permet de créer des 
fichiers d'index, contenant les numéros des 
enregistrements satisfaisant à un critère. À 
partir d'un fichier d'adresses, on peut ainsi 
constituer un fichier d'index reprenant par 
exemple toutes les personnes habitant la même 
ville ou le même département. Ce fichier 
d'index est utilisé par le "générateur de 
rapport" qui pourra alors éditer les rensei- 
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gnements concernant ces personnes. 
Hition de rapports 


Le ‘générateur de rapport! permet, à par- 
tir du fichier global ou d'un fichier index, 


d'éditer les données souhaitées. Les 
paramètres donnés peuvent être les champs à 
éditer, ou un intervalle de valeurs d'un 
champ. Il est également possible d'introduire 


des sous-totaux et des totaux. À noter qu'il 
est possible d'utiliser une imprimante ayant 
un driver en RAM, puisque la page 3 est dis- 
ponible à cet effet ($314 à 3D0). 


Possibilités de tris 


Il est possible de trier tout le fichier. 
Bien que nous n'ayons pas pu faire l'essai 
sur un fichier très gros, il semble que le 
processus de tri soit particulièrement longs 
la documentation indique en effet 10 à 15 
minutes pour un fichier de 200 cenrœæistre- 
ments ! 


Le tri peut être effectué sur un maximum de 
10 champs, et spécifié ascendant ou des- 
cendant sur chacun. Si le fichier ainsi trié 
est supérieur à l'espace mémoire disponible 
en RAM, le programme utilise un fichier de 
travail. C'est particulièrement dans ces 
moments-là que l'on apprécie le fait d'avoir 
deux drives ! 


Remarques diverses 


CCA DMS ct Visicalc étant distribués par la 
même société, la disquette comprend des 
programmes de conversion entre CCA et Visi- 
calc, en utilisant le format DIF (Data 
INnterchangce Format) qui est devenu un 
standard pour communiquer avec Visicalc. 

CCA DMS étant écrit en Applesoft et non 
protégé, il est possible de lister tous les 
programmes et donc de les modifier. De mème, 


les fichiers sont des fichiers TEXT standard 
et leur structure est expliquée en détail 
dans la documentation. IL est donc tout à 


fait possible d'utiliser les données stockées 
par CCA dans d'autres programmes. 


Documentation 


La documentation se présente sous la forme 
d'un classeur comprenant 90 pages de la 
taille désormais classique des manuels Apple. 


Elle est rédigée en anglais et permet de 
découvrir CCA pas à pas grâce à de nombreux 
exemples. 


Conclusion 


avantage de CCA réside dans 

I1 peut être modifié et ses 
fichers sont accessibles à tous. Ses 
principaux défauts sont ses limitations du 
nombre de caractères par enregistrement (232) 
et du nombre de champs (24), ainsi que la 


Le principal 
son "ouverture !. 





pauvreté des possiblités de recherche et de 


À 2 ais RE 
PERSONAL FILING SYSTEM POUR UNE UTILISA- 
TION INDIVIDUELLE 


Sur la petite boîte plate qui contient la 
disquette et la documentation du PFS s'étale 
un gros macaron bleu sur lequel est inscrit : 
"New Features". Voici donc la dernière 
révision du PFS. Qu'y a-t-il de changé ? Le 
prix tout d'abord, qui a grimpé de 50% à 
l'occasion du passage à la révision F, mais 
qui reste tout de même relativement sage pour 
un programme de gestion de fichier, Les 
améliorations techniques portent essentiel- 
lement sur trois points 


- la possibilité de scinder et fusionner les 
fichiers; 

- celle de redéfinir le fichier en gardant 
les données déjà entrées; 

- l'amélioration des possibilités de tris et 
d'édition sur imprimante. 


amélioration n'est malheu- 
suffisante pour combler la 
du PFS dans le domaine de 
rapports. Elle ne rend donc pas 
programme "jumeau" le 
a pour unique vocation 
rapports. Nous avons donc 
testé l'ensemble PFS et PFS Report afin que 
le tout soit comparable avec les autres 
prœiciels testés. 


Cette dernière 
reusement pas 
grande lacune 
l'édition de 
inutile l'achat du 
PFS Report qui 
l'établissement de 


Conf iguration 


L'ensemble deux 
disquettes 
Mbootées!! 


protégées, 


PFSiReport est proposé sur 
séparées qui ne peuvent être 
qu'en DOS 3.3. Ces disquettes sont 
c'est-àdire qu'elles ne sont pas 
copiables. Aucune disquette de sauvegarde 
n'est incorporée et il faut donc les 
commander aux USA (15 dollars chaucune), 
Le 

testés 


PFS esl le 
ici qui 
ancien Apple avec 
carte langæge 

L'ensemble du 


seul des quatre progiciels 
puisse s'exécuter sur un 

mémoire Integer et sans 
ou carte ROM Applesoft. 
\ programme est chargé dès le 
départ dans sa totalité. Il n'y a donc pas 
d'overlay et il n'est pas nécessaire de 
garder 1a disquette prœramme dans le drive, 
ce qui autorise l'utilisation du PFS avec un 
seul drive. Attention cependant, PFS Report 
nécessite une disquette de travail pour ses 
tris et rend alors souhaitable le deuxième 
drive. 


Menu principal 

Le menu principal comprend six options : 
- "Design File" correspond à la définition du 
fichier; 


- "Add" ajoute de nouvelles fiches; 
- "Copy" permet la sauvegarde des fichiers, 
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option rendue nécessaire par le fait que les 
fichiers créés par le PFS ne sont pas 
accessibles à partir du Basic; 

- ‘“Search/Update" regroupeles fonctions de 
recherche d'une fiche et de modification; 

- "Print" : édition‘ sur imprimante (cette 
fonction sert très peu lorsque l'on a le 
Report, beaucoup plus complet); 

- Remove" supprime les fiches. 


Le menu principal du PFS Report comprend 


quant à lui : 
- "Print a qui commande l'édition 
d'un rapport; 

- "Pre-define a Report, option permettant de 
définir à l'avance et de stocker sur 
disquette la forme et le contenu du rapport; 

- "Set New Headings", pour le changement des 
libellés sur le rapport. 


Report, 


Définition du fichier 


Le PFS n'utilise pas le concept d'enregis- 
trements et de champs, mais celui de pages- 
écrans. Il n'est pas nécessaire de spécifier 
la longueur et le type de chaque élément. Il 
suffit de laisser la place adéquate sur 
l'écran. 


La définition s'effectue très facilement en 
positionnant sur l'écran les différents 
libellés. On peut ainsi choisir soi-même la 
présentation de la fiche telle qu'elle 
apparaîtra à l'écran lorsqu'on voudra la 
consulter, Le nombre de caractères ou de 
lignes laissés entre un libellé et le libellé 


suivant définit la longueur maximum du 
renseignement qui pourra y être entré (la 
taille maximale d'un élément est donc 


légèrement inférieure au nombre de caractères 
disponibles sur l'écran soit environ 800 
caractères), 


Le premier élément défini possède une si- 
gnification particulière puisqu'il sera la 
clé d'entrée privilégiée dans le fichier. Le 
temps de recherche de La fiche définie par 
cette clé est de 2 à 3 secondes. Par contre, 


toute recherche sur un quelconque autre 
élément oblige la lecture complète du 
fichier. Le temps dépend alors de la taille 


du fichier. 


Si vos informations ne tiennent pas sur unc 
page-écran, on peut alors y ajouter des pages 
additionnelles (jusqu'à 31). La fiche est 
définie comme étant un ensemble de 
pages-écrans. (Comme d'autre part, il est 
posible de définir jusqu'à 50 éléments par 
page=écran, la taille d'une fiche peut être 
très grande. Seule limitation : le fichier 
global doit tenir sur une disquette unique, 


ce qui, dans le cas d'une fiche géante de 32 
pages avec 50 éléments par page, ne doit pas 
représenter beaucoup de fiches ! A l'inverse, 


si la fiche ne comprend qu'un seul élément, 
le fichier est quand même Limité à  1U0U 
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fiches. 
Utilisation du fichier 


L'option 2 du menu principal permet de 


remplir les fiches. La présentation de la 
fiche vierge suit scrupuleusement celle 
adoptée lors de la définition du fichier. Les 
libellés sont écrits en inverse, ce qui 


accroit la lisibilité, 


En bas de l'écran sont regroupées deux 
lignes d'information indiquant le nom du 
fichier sur lequel on travaille, le numéro de 


la fiche en mémoire, le numéro de la 
page-écran affichée et le pourcentæge de 
remplissage de la disquette-fichier (une 
nouveauté intéressante de la nouvelle 
révision). 


élément peut être entré séparément, 
permettant d'aller rapidement 
d'un élément à l'autre. Puisqu'il n'y a 
aucune déclaration des types (alpha, 
numérique...) des éléments, il n'y a pas de 
contrôle et il est possible de rentrer 
n'importe quelle donnée. Ile code postal 
pourra par exemple être rempli avec 
HABCDEFCH'" ! 


Chaque 
les flèches 


L'entrée définitive des données a lieu lors 
de ]la validation d'une fiche par la touche 
Control-C. La fiche est alors stockée sur 
disquette. Il n'y a malheureusement pas de 
buffer et à chaque entrée d'une fiche 
correspond un accès disque. Il est possible, 
avant de valider la fiche, soit d'effectuer 
des corrections, soit d'annuler purement et 
simplement l'entrée grâce à la touche ESC, 
Cette touche ESC est très pratique car elle a 
la même fonction dans tous les cas 
annulation des données ou de ia commande dé jà 
frappées et retour au menu. 


L'option 4 du menu permet la recherche et 
la modification d'une fiche. Les fonctions de 
recherche disponibles sont évaluées, avec 
notamment la possiblité de comparer le début 
ou la fin d'un élément, de tester l'occurence 
d'une chaîne de caractères (avec emploi de 
“wi 1d caracters!' ou caractères nuls), la 
position d'un caractère... Les tests 
numériques (inférieur, supérieur, différent, 
égal) sont également possibles sur les 
éléments contenant des nombres. Bref, des 
possibilités qui satisfont à 95% des cas. 


les critères de recherche sont en- 
programme affiche la première fiche 
est alors possible de la mdii- 
fier en changeant quelques données, puis de 
continuer la recherche. Cette facilité 
d'utilisation a un revers énorme : il n'y a 
pas de différence entre consultation de fiche 
et modification, c'est-à-dire que lorsque la 
fiche 
Il n'existe aucun mode 


Lorsque 
trés, le 
trouvée. Il 


est à l'écran, elle peut être modifiée, 
une 


qui permette 








consultation seulé, sans risque de la 
modifier (il suffit d'appuyer, sans s'en 
rendre compte, sur une touche quelconque pour 
modifier la fiche !!). Alors attention si 


d'autres personnes que vous-même ont accès à 


votre fichier ! 


Edition de rapports 


L'option 5 du PFS permet l'édition des fi- 
ches sur imprimante. Cette édition peut se 
faire sur une partie du fichier grâce à la 


spécification des fiches qui doivent être 
prises en compte, spécifications effectuées à 
l'aide des fonctions de recherche définies 
plus haut. Ensuite sont définis les éléments 
à éditer. Le PFS a des possibilités de 
définition et de spécification de rapports 
très réduites; le PFS Report est heureusement 


là pour le seconder. 


L'option 3 du Report permet de remplacer 
sur les rapports les libellés définis dans la 
fiche par des libellés plus explicites. 


2 concerne la prédéfinition des 

Ces définitions sont stockées sur 
et on peut mémoriser 8 types de 
rapports simultanément. Elles indiquent les 
éléments qui doivent être édités, l'ordre 
dans lequel ils seront imprimés et la mise en 
page du rapport (sauts de pages, sauts de 
lignes...). Le tri a lieu sur les deux 
éléments les plus à gauche sur le rapport. Il 
peut être spécifié en alphanumérique (le tri 
est réalisé selon l'ordre alphabétique) ou 
numérique (1e tri est fait par ordre 
décroissant). Il n'est notamment pas possible 
d'effectuer un tri numérique croissant ou un 
tri dans l'ordre inverse de l'alphabet. 


L'option 
rapports. 
la disquette 


Le Report autorise l'introduction de 
lignes supplémentaires consistant en des 
calculs de totaux, de nombres d'éléments dans 


PFS 


une colonne ou de moyennes. Ces calculs 
peuvent être effectués sur le rapport tout 
entier, ou sur chaque page du rapport sous 
forme de sous-totaux. Le Report autorise 


également la définition de colonnes dérivées 
(3 au maximum) dans lesquelles pourront être 
reportés des calculs numériques effectués à 
partir des autres colonnes. (Ces colonnes 
dérivées ne doivent pas être confondues avec 
des champs calculés, car elles n'existent que 


libellés du nouvel écran présents dans 
l'ancien, seront reprises dans le nouveau 
fichier. 

Quant à la séparation d'un fichier en plu- 
sieurs morceaux ou la fusion de plusieurs 
fichiers, elle permet une meilleure 
adaptation du fichier aux besoins 
réels. 

Documentation 
Le PFS et le PFS Report disposent chacun de 


leur manuel (90 et 45 pages respective- 
ment). Ecrits en anglais, très clairs, ils 
comprennent de nombreux exemples et surtout 
beaucoup de représentations de l'écran. Mais 
le plus agréable, c'est la version française 
du manuel de l'opérateur jointe avec le PFS. 
Cette brochure de 45 pages, éditée par 
Sonotec (l'importateur de PFS), a été 
visiblement tirée en traitement de texte sur 
Apple et une Centronics. Le résultat est bon 
et réjouira tous ceux à qui l'anglais donne 
des maux de tête. 


Conclusion 


La qualité primordiale du PFS, c'est avant 
tout sa facilité d'utilisation (surtout pour 
la partie définition du fichier) et sa 
rapidité d'apprentissage. Dans le cas d'une 
utilisation personnelle sans gros besoins de 
rapports, il n'est peut-être pas nécessaire 
d'acheter le PFS Report; le prix est dans ce 
cas très compétitif par rapport à celui des 
autres programmes. 


S'il est 
dividuels, 
pour des 


indiqué pour des utilisateurs in- 
il est par contre peu recommandé 
applications professionnelles en 
raison principalement de l'absence de 
contrôle lors de la saisie et surtout de 
l'impossibilité de consultation sans risque 
de modification. 


VISIFILE : POUR VISI-PHILES UNIQUEMENT ... 


Nous voici en pleine Visi-manie. Après Vi- 
sicalc, Visidex, Visitrend, Visiplot, Visi- 
machin, voici venir Visifile distribué comme 


il se doit par Visicorp, nouvelle dénomina- 
tion de Personal Software ! 


Bus le A Le et A pas possible de Ouvrons done le classeur. A la fin, dans 

es incorporer dans la fiche. une pochette en plastique, deux disquettes. 

Divers Un original et un backup ? Excellente idée ! 
i ' & , ' 

La nouvelle révision ajoute au PFS un cer- rt SR ni Mon Ac ” da. 1h Cu vs 
tain nombre de fonctions supplémentaires dont DAEUR. 107 S _ PECOEORSS SRE PRRMPLE SU MORE 
4 ; PES disquettes. Comme trop souvent, vous devrez 
deux sont les bienvenues : la redéfinition du , : 

; PA ecrire aux USA et trouver quelques dollars 
fichier et la possibilité de scinder ou | FRE 
- se Ne P L pour pouvoir bénéficier de la disquette de 
fusionner les fichiers. La redéfinition du ts 
fichier permet d'adapter le fichier aux FE 
besoins au fur et à mesure du temps. Certains Dans cette même pochette est incorporée une 
éléments définis sont peut-être inutiles, carte de référence à cinq volets. Voilà qui 
d'autres font cruellement défaut. Lors d'une va nous être bien utile tout au long de cet 
redéfinition, les données correspondant aux essai ! 
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Conf iguration 


IL est possihle d'exécuter Visifile sur 
n'importe quel type d'Apple II (Applesoft ou 
non), pourvu qu'il soit équipé du DOS 3.3. Au 
premier chargement du programme, il est 
nécessaire d'inscrire le nombre de drives 
connectés. Le numéro du slot est testé 
directement par le programme (quel 
raffinement !) qui constitue le classique 
fichier "configuration" évitant de rentrer 
les paramètres à chaque cxécution du 
programme. Les overlays étant nombreux, il 
parait souhaitable de disposer de deux drives 
: un pour le programme et un pour les 
fichiers. 


Menu principal 


Après affichage de la version et du numéro 
de série, le menu principal est affiché à 
l'écran. Il n'occupe que quatre lignes en 
haut de l'écran, afin de laisser le reste de 
l'écran libre pour les fiches ou pour 
l'affichage des commandes disponibles qui se 
trouvent ainsi pratiquement toujours sous les 
yeux de l'utilisateur. Les deux flèches 


permettent de sélectionner la commande 
désiréee à l'aide d'un curseur en vidéo 
inverse (il me semble avoir déjà vu cela 


quelque part...) 


M dispose de neuf options 


- "Select" : choix du fichier 

- “Define! : définition du fichier 

- "Maintain" : entrée, consultation, modif i- 
cation et suppression des enregistrements. 

- "Sort" : création des lichiers d'index, a- 
fin d'ordonner le fichier principal 

- "Copy" : duplication d'une partie ou de la 
totalité de la disquette fichier 

- "Print" : édition sur imprimante 

- "Back up" : réalisation de disquettes de 
sauvegarde pour les fichiers (pratiquement 
identique à l'option Copy). 

- "Special" : fonctions annexes telles que 
l'initialisation de disquettes vierges, le 
transfert de fichiers DIF, le changement 
des paramètres disques et imprimante... 

- "Done" : fin de la séance de travail. 


Définition du fichier 


Elle est réalisée par l'intermédiaire de la 
fonction "Define". Lorsque cette Fonction est 
choisie au moyen du curseur et, après 
quelques tours de disquette sur chaque drive, 
un sous-menu est affiché. Ia fonction 
"Create" permet de créer el de définir le 
fichier. Pour chaque enregistrement doivent 


#“ La . . : : # 
être définies trois caractéristiques : 


- le nom, limité à 10 caractères 

- la longueur, limitée à 128 caractères pour 
un champ alphanumérique et à 38 pour un 
champ numérique 

- le type : Alphanumérique, Numérique ou 
Permanent (717?) 
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Comme pour le CCA DMS, la taille maximum 
d'un enregistrement est de 232 caractères 
(bien faible!) ou de 24 champs. Le nombre de 
caractères disponibles est affiché en 
permanence en haut de l'écran et est diminué 
au fur et à mesure de la création des champs. 


caractéristique intéressante est à no- 
est possible d'opter lors de la 
du fichier pour un format de 
automatique ou personnalisé. 
automatique (par défaut), 
est placé aussi près que 
prédecesseur. Si la place 
la ligne n'est pas assez 
il est placé sur la ligne 
Dans le cas du format personnalisé, 
spécifier la place qu'il 
sur l'écran à chacun des 


üne 
ter : ‘“l 
définition 
visualisation 
Dans l'option 
chaque champ 
possible de son 
restant sur 
importante, 
suivante. 
l'utilisateur doit 
souhaite attribuer 
champs. 


Utilisation du fichier 


Une fois l'option "Maintain! choisie, l'u- 
tilisateur peut alors assister à un Son et 
Lumière spécial pour deux drives. L'écran 
dispense des messages rassurants, soit dans 
l'orûre : MReading...","Writing..."(tiens, 
Liens, quelle idée ?!),"Loading Maintenance 
functions" (là, j'ai de la chance car toutes 
les fonctions se Lrouvent sur la même 
disquette prosgramme),'"Reading files, please 
“ait"(je ne fais que cela!}), ,"Formatting 
screen"... En tout 28 secondes hien longues ! 


he fiche vierge est alors présentée à 
l'écran. On peut à présent ajouter une fiche, 
la modifier, la supprimer ou chercher une 
autre fiche, tout ceci heureusement sans trop 
de temps d'attente. L'entrée est relativement 
facile grâce aux deux flèches qui permettent 
de passer d'un champ à un autre sur l'écran. 
Sont également utilisarles de nombreuses 
fonctions d'édition (sous forme de caractè- 
res de contrôle) qui permettent par exemple 
d'insérer ou de supprimer un caractère. 


Les fiches ne sont pas enregistrées sur la 
disquette au fur et à mesure de leur entrée, 
mais à une fréquence dépendant de leur 
longueur. À noter que pour la modification ou 
la recherche d'un fiche, il est nécessaire de 
fournir son numéro, ce qui n'est pas très 
commode. 


Possibilités de tri 


Le tri d'un fichier Visifile provoque la 
creation d'un fichier d'index qui pourra 
ensuite servir à l'édition de rapports ou à 


la consultation de fiches. Il cest possible de 
trier jusqu'à 10 champs maximum et de stocker 
un maximum de 2! fichiers d'index pour chaque 
fichier Visifile. 


Divers 


Etant édité 
évidemment 


par Visicorp, 
d'une 


Visif ile dispose 
structure de fichier au 
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format DIF qui lui permet d'utiliser les 
données d'autres programmes et notamment de 
récupérer les f'ichiers de CCA DMS. 


Documentation 
Ecrite en anglais, La documentation de Vi- 
sifile est l'un de ses points forts. Grâce à 


un exemple de fichier fourni sur la disquette 
novice 


programme, l'utilisateur peut 
rapidement apprendre le fonctionnement de 
Visifile en suivant les différents chapitres 


de la documentation, dans laquelle on trouve 


de très nombreuses représentations de 
l'écran. 
Conclusion 

La dernière pétale de la marguerite que 
j'effeuillais est tombée sur “pas du tout". 
C'est vrai, j'ai été quelque peu déçu par 
Visifile. Certes, on ne peut pas refaire tous 
les jours un programme de la trempe de 
Visicale. Mais j'ai retrouvé dans Visifile 
beaucoup trop de limitations du CCA DMS 
telles que la longueur des champs et de 
l'enregistrement ou la faiblesse de 
l'évaluation des formules pour les champs 
calculés évoquée pour CCA. Et ce que l'on 


pardonne à un programme vieux de trois ans ne 
peut plus l'être pour un programme récent. 
Quant à la lenteur des opérations, elle a mis 
mes nerfs à bout. Attendez donc la version 
suivante et pensez à PFS ou DB Master pour 
vos achats ! 


DB MASTER LE MAITRE 


Un nom qui "sonne" bien, et annonce d'en- 


irée la couleur Master Stoneware, 12 so- 
ciété qui le distribue, ne fait pas dans la 
nuance. Mais il est vrai que l'on peut se 
permettre d'être ambitieux avec un tel 
produit ! 

Comment vous le présenter ? À vrai dire, 
L'Ordinateur Individuel, revue bien connue, 
m'a coupé l'herbe sous les pieds puisqu'ils 
ont publié un essai du DB Master dans le 
numéro du mois de juillet-août 1982. Je ne 
serai pas rancunier et je vous recommande de 
lire leur article avant le mien afin de faire 


connaissance avec le DB. Il n'est donc pas 
question de refaire ici une analyse complète, 
mais plutot de souligner quelques points et 
d'examiner les deux disquettes utilitaires 
prévues pour le DB. 


Atouts et points faibles du DB Master 


choses qui frappe, 
lorsqu'on débute sur le DB, c'est l'utili- 
sation de mots de passe. Non pas un. mais 
trois qui permettent une hiérarchie entre les 
différents utilisateurs et assurent une 
certaine sécurité et confidentialité des 
données. Le premier mot de passe n'autorise 
que la lecture des champs non protégés à la 
conception, le second permet la lecture et la 


L'ime des premières 


modification de tous les champs existant dans 
un enregistrement, Le troisième est le sésame 
: il permet de changer tous les mots de passe 
ct donc de sélectionner les utilisateurs en 
leur fournissant le nouveau mot de passe ou 
non. Rassurcz-vous, si vous avez la mémoire 
défaillante, vous pouvez toujours concevoir 
votre fichier sans aucun mot de passe ! 


surprise, la mention "illimitée" en 
face de l'information taille maximum du 
fichier. En effet, DB peut stockcr les 
données d'un fichier sur autant de disquettes 
qu'il le faut. Cette possibilité de chaînage 
des disquettes, couplée à la compression 
importante des données avant leur stockage, 
autorise la création et l'exploitation de 
fichiers importants, dont la taille ne sera 
plus limitée que par l'ennui de La personne 
chargée de changer les innombrables 
disquettes dans le drive (bon courage : la 
documentation signale que l'on peut aller 
jusqu'à 256 disquettes !). 


Autre 


enregistrement est défini par une 
qui doit être unique (35 
maximum) et peut posséder 
plusieurs clés secondaires. Grâce à ces clés 
secondaires, on peut retrouver rapidement une 
fiche à partir de renseigenements divers. En 
effet, le temps maximum de recherche d'un 
enregistrement par sa clé primaire est de 
trois secondes, celui de la recherche à 
partir d'une clé secondaire est de 5 à 7 
secondes. Mais cette performance se paie cher 

le moindre fichier nécessite deux 
disquelles ! La première contient le fichier 
de chaînage des clés secondaires par rapport 
aux clés primaires ainsi que les rapports 
prédéfinis. La seconde contient les données 
proprement dites. Comme, de plus, la 
disquette programme doit rester en place en 
raison des overlays, le minimum confortable 
pour l'utilisation de DB est de 3 drives (et 
donc deux controleurs). 


Chaque 
clé primaire 
caractères 


Le DB autorise 10 types de champs diffé- 


rents. La définition d'un fichier, qui est 
déjà compliquée avec la spécification des 
clés primaires et secondaires, s'en trouve 
encore alourdie. Mais ce n'est qu'une 
mauvaise étape à passer car, une fois le 
fichier défini, l'utilisation est beaucoup 
plus facile et plus sûre. Il n'est plus 
possible de se tromper dans les entrées, car 
tous les contrôles sont faits type des 
données, présence facultative ou obligatoire, 
longueur fixe ou variable... Il est même 
possible d'utiliser des valeurs par défaut 
afin de faciliter la tâche. Parmi les types 
de champs les plus intéressants, on dispose 
de : 


- ML'Auto-date", qui contient la date à la- 
quelle l'enregistrement a été accédé pour la 


dernière fois. Cette date est remise à jour à 

chague accès de l'enregistrement, On peut 

toutefois déplorer, comme pour le type 
— 
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ee ee me ee ee eee me ee 0 ee ee ee ee ee me D em ee ee oo om om 


! Nom du programme...! CCA Data Manage- ! Personal Filing ! Personal Filing . 
! ! ment System ; System ! System Report ; 


ee ie mc on mi mem om À 





! Auteur (s).......::.! Helmar Ben Herman! John Page L John Page ! 
! 1& Colin G, Jameson! & D.D Roberts . L 











! ! ‘ Software Publish-! Software Publish- ! 
t Distribution.......! Personal Software! ing Corporation ! ing Corporation 


! Version testée.....! CCA DMS V 5.2 ! PFS Rev F (03/82)! Rev C (08/81) : 











| PERRET ee es ee me ee 


! Prix indicatif... 1000 F HO REVEs: 6807 : 880 F : 
! 1 ! RévF s: 1250F ! L 





me 
‘ Documentation......! Anglaise, 90 p. ! Anglaise, 90 p. ! Anglaise, 45 p. ! 
! J ! Française, 45 p. ! 


ee 








1 Disquette... ! Non protégée ! Protégée ! Protégée ! 
L'HAERU Pisces se : = ; Sans Backup ; Sans Backup . 


ot mm mem is ed es en cc cc nn 0 ee memes Î 


! Apple II + ou ë - £ 

















L 

! . 

! Configuration Apple! Apple II avec ! Apple II ou ! Apple II ou $ 
! ! ROM Applesoft ou ! Apple II+ } Apple 11+ L 
t ! carte langage } : ; 
FE 1 D | 
! Nombre de drives : L L L 
= souhaitables.....! 2 ; 1 ! 2 - 
Bret RP PEN, EE né en ie jm RÉ (l 
! Fichier maximum....! 1 disquette L 1 disquette - = 1 


PE À 
. 























! Taille maximun des ! 232 caractères :! 32 pages-écrans : ” i 
! enregistrements...! ou 24 champs ! « : 
L ee 0 0 00 1 
! Taille maximum = ! 1 page-écran soit! # L 
{ d’un champ........ 1 252 caractères ! 800 caractères ! N 
CRE ee ce ee 0 ——— | 
! Type des champs....! Alpha, Numérique ! pas de définition! Aipha et 7 
! ! et Permanent ! de types , Numériques ! 
: : 1 1 : 
1 1 1 ! t 
! 1 1 ! (l 
1 ! u : 1: 
DE TR RSS EEE SE 
! Champs calculés....' Oui : Non ! 3 : uniquement e 
: : : : sur le rapport : 
LEE 

: Compatibilité DIF..: Oui ù Non - = ! 
eq po à 
! Possibilité de : : L L 
!  Redéfinition.....! Non ; Oui : e ! 
! Fusion fichiers..'! Non ; Oui : Se ; 


mm mm me ms me ee me me ce eee en een ee one ce me ee ei me eue ee mue ce ue ce sine mé ce ie me De de ee ne ne ee ee de ce me ee em do mm 
22222222 EZ=EZE2========= === === 
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: : VISE ILE : DB MASTER :  UTILITY PAK 18&2 ! 


* Nom du programme... ! Visifile : Data Base Master ! 

1 1 1 1 

D 0 e-santé 

! Auteur (Shssssssss..! Richard Ewing & ! - 

; lJohn Unger Zussman! Barney Stone Ê Barney Stone 














! Distribution.......! Visicorp , Stoneware ! Stoneware 
2 
! Version testée..... 1 Visifile V 1.0 : Version 3 ! = 





CEE 





! Prix indicatif.....! 2595 F ! 2300 F rt SL: 79PF 
: ! = ! UP #2 : 1200 F 


! Documentation......! Anglaise, 164 p. ! Anglaise, 130 p. ! UP #1: 
: : : ! UP #2 : 18 p. 


1 1 1 = 1 nn ve ie on + cn 1e + ce + + 














1—mmm——…— 

! Disquette..........! Protégée (2 Dk) ! Protégée ! Protégée , 
! Backup.............! Sans Backup ! Sans Backup ! Backup Fourni ! 
! Achat Backup.,......! USA : 20 $ £ USA : Gratuit ! = : 
À mumenesemens SERRE OR RP PE PR RE | 
: 1 ! Apple II + ou ! Apple II + ou { 
? Configuration Apple! Apple II + ou ! Apple II avec ‘ Apple II avec 

f } Apple II ! ROM Applesoft ou ! ROM Applesoft ou 








romane emremeenmenraess. ee 





! Nombre de drives 1 1 ! 


: 
1 
: J ! carte langage ! carte langage ; 
1 
1 
*  souhaitables.....! 2 : 3 ; 3 ! 











! V/N — Nuséro 


! 
! Fichier maxiaum....! 1 disquette ! illimité L = ! 
t | 
! Taille maxiqum des ! 232 caractères ! 1020 caractères ! ; 
l enregistrements...! ou 24 champs 1 ou 100 champs E _ ! 
l'mmsmsssirensememesmsmismenismmmmvsmmmrem mener um enemenesn ss est creer nine en means 
! Taille maximum ! Alpha : 128 car. ! Alpha : 30 car. 
U d’un champ........ ! Num =: 38 car. ! Num : 9car. ! = 
S'enmasaersmesmmmermmemmessmasssmssp s’en anis hé ss issus en one ain ous dr en Lite is eos 
: ! Alpha, Numérique ! Alphanumérique : 
! Type des champs....! et Permanent ! Numérique (3) . 

; ! Date (2) : . 

- : Dollar/cents : 

! : Î 

L t L 


1 

1 

! 

1: 

! 

: : Sécurité Sociale ! 
Le uen 
! Chaaps calculés....! Oui ! 24 : uniquement ! = 
: ; ‘ sur le rapport ! 

1 
! 
: 
1 
! 
1 











Compatibilité DIF..! Gui ! Qui L _ 
! Possibilité de ! 3 : 
Fusion Fichiers.. ! Non ! Oui avec UP #1 :! _ 
EC LL QUO 
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"Date", qu'il n'y ait pas le choix entre la 
notation européenne (jour/mois/an) et la 
notation américaine (mois/jour/an). 


- Le type Y/N, ne pouvant prendre que deux 
valeurs : Yes ou No. 


fDollar/Cents!' tout-à-fait adapté 
aux données exprimées en dollars, Seul pro- 
blème, en francs et centimes bien de chez 
nous, la limitation à 9 digits correspond à 
une valeur sept fois plus faible qu'en petits 
billets verts ! 


—- Le type 


Les possibilités de tri paraissent sans 
failles puisqu'il est même possible d'ef- 
fectuer des ET et des OÙ logiques entre les 
différents critères choisis. Mais là encore, 
le nombre de possibilités et la densilé de 
l'affichage à l'écran rendent la maîtrise du 
système longue à acquérir. Et l'absence d'une 
carte récapitulative de toutes les commandes 
se fait largement sentir. 


Autre invention 
forms" destinées 
tion du fichier 


bien pratique : les "short 
à faciliter la consulta- 
ou l'entrée des données. Le 
principe est de ne présenter à l'écran que 
les champs utiles à l'utilisateur, sous une 
forme qu'il aura lui-même définie, et d'éli- 
miner toutes les autres qui sont inutiles. 
Cette possibilité accroit notablement la 
lisibilité du fichier et permet surtout une 
utilisation plus facile pour des personnes 
autres que le concepteur. 

Stoneware a d'autre part réalisé deux dis- 
quettes d'utilitaires qui complètent les 
fonctions du DB. La première date de 1981, 
tandis que la seconde vient juste de sortir. 
Dans les deux cas, ces disquettes sont 
protégées et donc non copiables, mais une 
disquette de sauvegarde (backup) est présente 
avec l'original (c'est trop rare pour ne pas 
le signaler !). 


La disquette Utility PAK 1 


Elle ajoute un nombre important de possi- 
bilités au DB : 


-redéfinition et restructuration du fichier 
avec la possibilité d'ajouter ou d'enlever 
des champs, de modifier les champs calculés 
et surtout de redéfinir la clé primaire, 
Toutes ces fonctions sont d'autant plus 
importantes sur le DB que les contrôles sont 
très stricts en ce qui concerne les types des 
champs et que la moindre erreur de définition 
du fichier peut avoir à la longue des 
conséquences néfastes. 

“duplication des fichiers de données afin de 
constituer des sauvegardes. 

fusion totale ou sélective de 2 fichiers. 
-possibilité de "réparer" une disquette de 
données endommagée (inutile si on a fait 
consciencicusement les sauvegardes nécces- 
saires...). 
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statistiques sur les fichiers 
la disquette programme 


-édition de 
(déjà incorporé dans 
du DB Master. 
translation des fichiers afin de les rendre 
compatibles avec le format DIF (utilisé par 
Visicalc). A cet effet, la documentation 
inclut la spécification technique complète du 
format DIF. Autre possihilité de transla- 
tion possible : fichier DB vers fichier TEXT 
et inversement. Une idée intéressante si on 
veut utiliser les données du DB pour d'autres 
programmes . 


La disquette Utility PAK 2 


Au contraire de la disquette 1 qui n'est 
valable que pour la version "standard" du DB, 
la disquette ? peut également être utilisée 
avec les versions spéciales pour disques 8 
pouces et disques durs connectables à l'Apple 
(notamment pour le Corvus 5 et 10 Mo). Les 
fonctions offertes sont les suivantes : 


- "Global Æitor"' qui permet de supprimer ou 
de modifier le contenu de certains champs sur 
le fichier entier. Il est par exemple 
possible de remplacer le contenu d'un champ 
par une constante ou le résultat d'un calcul, 
d'incorporer dans un champ numérique la 
différence entre deux dates présentes dans 
l'enregistrement... 

- "The Label Printer" 
l'édition d'étiquettes. 


améliore et facilite 
Il autorise la con- 


version automatique des données issues du 
fichier DB en minuscules, sauf pour la 
première lettre du mot qui reste en 
ma juscule. 

- "Transaction File Merge" apporte la pos- 


sibilité de transférer le contenu d'un ou 
plusieurs champs numériques entre 2 fichiers. 
- MReblock for Extra Space! est particuliè- 
rement utile lorsque la taille du fichier 
dépasse une disquette. Il est alors inté- 
ressant de regrouper toutes les informations 
relatives à un même enregistrement sur une 
disquette unique afin d'éviter d'avoir à 
changer les disquettes trop souvent. 

- "Change Read Protected Fields" permet de 
changer les champs protégés en champs normaux 
et inversement. 


Conclusion 


Le DB Master est à mes yeux le meilleur 
programme disponible sur Apple II (sans la 
carte Z80) pour une application profession- 
nelle. Doté de ses deux disquettes d'utili- 
taires, il représente un fantastique outil de 
travail. Mais attention, la puissance se paie 
par une complexité plus grande et il faudra 
un certains temps d'adaptation pour assimiler 
son maniement. Le surnom américain de DB 
Master est, ne l'oublions pas, "DB Monster!!! 
Le seul reproche qui peut être fait quant à 


ses caractéristiques techniques concerne la 
longueur maximale d'un champ alphanuméri- 
que,de 30 caractères, qui peut se révéler 


dans certains cas insuffisante, 
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La programmation facilitée 


Denis Sureau 





Le langage d'assemblage permet d'écrire des 


programmes très rapides mais aussi - le 
moniteur est écrit dans ce langage - de créer 
les fonctions d'un ordinateur, aussi la 


possession d'un assembleur (LISA, BIG MAC, 
SC) peut nous inciter à jouer les Steve 
Wozniak et doter notre Apple de fonctions 
nouvelles. Dans un programme Applesoft, 
certaines procédures (formatage de l'écran, 
menu, boucle d'attente) reviennent constam- 
mont, et notre imagination créatrice se 
tournera plutôt vers ces fonctions... 


L'instruction INPUT de l'Applesoft, refuse 
obstinément "," et ":1 que ce soit à partir 
du clavier ou du disque. Nous détournerons 
avant tout cet inconvénient en utilisant la 
procédure GETLIN(FD6A) du moniteur, tandis 
que PTRGET(DFE3) cherchera le nom de la 
variable spécifiée dans la table et, si elle 
ne la trouve pas, l'y ajoutera. 


Pour transférer le contenu du buffer d'en- 
trée ($200) vers la mémoire, i1 faut trouver 
un emplacement libre parmi les autres vari- 
ables, avant d'effectuer le transfert; mais 
si l'adresse du nom de la variahle dans la 
table se trouve en FORPNT(85,86) déjà obtenu 
grâce à PTRGET(DFE3) précédemment employé, et. 
si l'on charge les registres A et Ÿ avec 
l'adresse du buffer d'entrée et X avec le 
caractère RETURN($8D) qui délimite la fin de 
la chaîne, alors la procédure MAK (E3E9) de 
l'Applesoft fera Lout cela pour nous! SAVD 
(DA9A) placera l'adresse de la chaîne en 
mémoire et sa longueur dans la table des 
variables. 


Ainsi est née l'instruction & INPUT, et 
elle ne refuse pas les virgules! Cependant, 
l'emploi de fichiers à accès direct par 
exemple demande que les données aient une 
longueur limitée et, pour éviter les 
problèmes causés par des données amputées de 
la partie excédentaire, une boucle affichant 
une ligne de points de la longueur: désirée, 
grâce à la procédure d'affichage COUT ($FDED) 
, nous dotera d'une authentique instruction 


de formatage: mais auparavant une autre 
boucle contenant cette fois BS (CALL-1008) 
(FC10), qui recule le curseur, placera 


celui-ci en début de ligne, 


Notre instruction prendra maintenant la 
forme: & INPUT A ,L1 où 1 représente (à ti- 
tre indicatif ) la longueur maximale des 
données à entrer. 
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On peut aussi éviter l'emploi des instruc- 
tions VTAB et HTAB en définissant deux para- 
mètres supplémentaires et en plaçant la po- 
sition verticale (-1) à l'adresse $25 (37), 
en appelant la procédure VTAB du moniteur, et 
en spécifiant la position horizontale à 
l'adresse $2L (en décimal 36 et toujours -1, 
la soustraction étant faite par le programme 
assembleur). 


Sous sa forme la plus complète l'instruc- 
tion devient: &INPUT A , Li, Vv,lh, "LABEL" où 1 
est la longueur de l'information, v repré- 
sente la ligne d'écran (comprise entre 1 et 
24), h la colonne (de 1 à Q) et LABEL, 
toujours en dernière position, un texte à 


afficher avant interrogation du clavier. 
L'ordre des trois paramètres numériques est 
libre, mais il est nécessaire que la 
variable, une variable de chaîne de 
caractères, simple onu dimensionnée, soit 
analysée en premier lieu. Voila une 


instruction de formatage d'écran que l'on 
pourrail appeler par exemple FORMAT, qui 
facilite l'entrée de données; nous verrons 
plus loin qu'avec quelques instructions 
Applesoft on obtient aisément l'équivalent en 
sortie, nécessitant normalement un PRINT 
USTNG. 


Attaquons-nous pour l'instant à la deuxiè- 
me fonction suggérée en introduction, la sé- 
lection d'une option dans un menu. Il existe 
un système de sélection qui évite de numé- 
roter les différentes options et donne à un 
menu un aspect parfaitement professionnel. Un 
curseur se déplace d'une option à l'autre; il 
peut s'æir d'une flèche qui se positionnera 
devant chaque item ou d'une barre inversée 
yui présentera en noir sur blanc l'option sur 
laquelle on la positionne. À cet instant, on 
appuie sur RETURN et l'option spécifiée de la 
sorte est sélectionnée, grâce en l'occurence 
à la procédure en assembleur que nous allons 
décrire. 


Pour réaliser la barre, nous ferons appel à 
VTAB(FC22) qui calcule l'adresse d'une ligne 
d'écran à partir d'un numéro placé en CV($25) 
et place une adresse en $28 et $29. La marge 
gauche et la longueur de la barre étant 
spécifiées, on chargera chaque position 
d'écran en A, l'instruction AND #$3F 
convertissant le code du caractère en son 
équivalent inversé qui sera stocké sur la 
même position. 


r. 











Lorsqu'on appuie sur la flèche droite du 
clavier, le curseur doit se positionner sur 
l'item suivant et, lorsqu'on appuie sur la 


fièche gauche, remonter au précédent. Comme 
le nombre d'interlignes peut varier d'un menu 
à l'autre, on spécifiera par POKE le nombre 


d'e sauts de lignes, normalement deux à 
l'origine, la table des PATCHES précisant 
plus loin à quelle adresse. Elle indique 
également comment remplacer la flèche, 
symbolisée par le caractère "!!, par un autre 


caractère quelconque. 


étant de simplifier le menu 
au maximum une instruction particulièrement 
riche viendra se placer entre la liste des 
options et le branchement vers les sous- 


Notre objectif 


programmes correspondants, et rien d'autre! 
Son format est le suivant: 

& LET A, VTAB , MARGE , LONGUEUR , NOMBRE 
D' ITEMS 

Ici, l'ordre des paramètres est fixe, el ce 
sont respectivement le nom de la variable qui 
contiendra le numéro de l'option sélec- 
tionnée, le numéro de ligne de la première 
option, la marge, la longueur de la barre, 
qui sera remplacée par une flèche si l'on 
spécifie O0 et le nombre d'options dans le 
menu. 


Lors de la sélection, si l'on tape ESCAPE, 
l'instruction HOME s'exécutera et le pro- 
gramme s'arrêtera. Une sélection numérique 
basée sur l'ordre relatif des items sera 
également possible, afin de prévoir tous les 
cas. D'ailleurs, l'usage de cette routine ne 
se limite pas aux menus, et je ne doute pas 
que vous en trouvicz d'autres utilisations! 


TABLEAU DES PATCIHES 


Saut de X lignes. X=1 si l'on 
veut un menu sans interligne 
Flèche : X est le code ASCII 
du caractère à afficher + 128 
Durée d'attente : X=-128 aus- 
mente la durée, X=-128 diminue 


POKE 37656, X 
POKE 37657,X 


POKE 37658, X 


(pour 32K, soustraire 16384 à ces valeurs) 
assembleur ne contient hé- 
de fonction PRINT USING, bien utile 
pour formater l'écran en sortie, mais les 
opérations de base de cette instruction 
peuvent s'obtenir simplement en Applesoft: 
HTAB 30 -— LEN(STR (INT(A))); 
permet d'aligner une colonne de nombres sur 
la virgule ou, si ce sont des entiers, de les 
aligner sur le chiffre des unités tandis que 
l'arrondi au plus proche s'obtient en 
définissant une fonction ARR: 


Notre 
las pas 


programme 


DEF FN ARR (A)= INT(A*100+.5)/ 100 


qui arrondit ici sur deux chiffres, et en 
affichant: PRINT ARR(A) 
L'arrondi au chiffre inférieur s'obtient en 


supprimant +.5 dans la définition ci- dessus. 


Le programme en BASIC listé ci-dessous est 
un programme de démonstration appelant la 
version BK du programme. Le code source et. 
la récapitulation en hexa de la version 48K 
du programme, ainsi que la récapitulation de 
la version 32K, sont fournis dans la suite de 
cet article. 


S'ils sont placés dans l'ordre, avec leurs 1ETIST 

numéros de départ espacés par un incrément 
égal, plusieurs sous-programunes seront appe— 1  REM KXXHXOMKOKKOKAKKKHKKHCKKHKCHCIK HOHKK 
lés en Applesoft par une instruction du genre AR ÉTRETT x 
ON X GOTO 1000, 2000, 3000, etc..., en x FROGKAMMATION x 
Integer par l'équivalent GOTO X * 1000, plus x FACILITEE x 
simple, comme il est également plus facile de x ER x 
se souvenir d'un nom de sous-programme que X FAR D, SUREALU x 
d'un numéro de ligne. Les instructions & GOTO x (C) 1982 x 
ou & GOSUB que l'on rajoute à notre programme M eee ce ee eee me x 
nous donnent cette possibilité de l'Inteser. 2 REM KXXKXXXKAKMKKKKOKK AK HOK HOKKHOK 

3 KREM 

La dernière fonction que nous envisægions de 4  FRINT CHR$ (4)'"ERUN FROGR48K" 
programmer était la boucle d'attente et nous 
utiliserons pour cela la procédure WAIT 9 AFPF$ = MAMFER HAIT,,,," 
($FCA8) du moniteur. Ce que nous voulons, 6 INFT = 10000 
c'est uñe instruction simple et & WAIT 15 TEXT $ HOME 
devrait faire l'affaire! Pour les impatients, 16 FOR T = 1 TO 40! FRINT "&''f! NEXT 
on prévoira la possibilité de poursuivre le 4 
traitement dès que qu'une touche est 17 FRINT "&'"$25 HTAF 40% FRINT "& 
enfoncée. Placée à l'intérieur d'une double &'"}ÿt HTAE 40# FRINT "&R'";5t HTAE 
boucle, avec le test du clavier, la procédure 40% FRINT "&'"; 
$FCA8 engendre une attente de 15 secondes que 18 FOR I = 1 TO 40 FRINT ‘&'"$ÿf NEXT 
l'on peut modifier en agissant par POKE sur à D 
le nombre de tours d'une des boucles, comme 
le montre le tableau des PATCHES ci—essous, 
23 
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V 


100 
108 
109 
110 
111 
112 
113 


115 
116 
117 
490 


300 
550 
560 
600 
700 


990 

9791 

1000 
2000 
3000 
4000 
5000 
3010 


9990 
1000 
1001 


1003 
1004 


1005 
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FRINT $ VTAE 3% HTAE 113% 
"DEMO MENU KRAFIDE" 
VTAE 6 
FRINT '---COMMANDES---AH"$ 4 TNVERGSE 
$ FRINT " ESC « S RENE E-9 
5: NORMAL 
PRINT 3 
FRINT $ FRINT " 


FRINT 


VOTRE CHOIX? 


VTAE VTE 
ITEM 


TE 113 
FRINT 
FRINT 
FRINT 
FRINT 
FRINT 
FRINT 
PRINT " LIEN) 4° 
& LET A,VTE,5,933,4 
REM 
KEM 
REM 
REM 
REM 
REM 


ITEM 


ITEM 


DANS L'ORDRE, 
A=NUMERO CHOIST 
1-VTAE DU 1ER TITRE 
2-MARÇCE GAUCHE 
3-LARGEUR DU CURSEUR 
INVERSE 
4-NOMERE DE TITRES 
L'ORDRE DES F'ARAMETRES 
EST FIXE: 


REM 
REM 
REM 
REM 


& CGOSUE À x 1000 
FRINT 

FRINT ÊFF$: 
& CGCOTO INFT 
REM 


&  WAIT 


née mu mnt une ame sans mme ane no0e note mes ane sont me she sont dote oâfe ne soudé 


REM SOUS-FROGRAMMES À 
REM EXECUTER » » » 


GOSUE 5000% FRINT "ITEM 1" RETURN 
GOSUE 5000 FRINT “ITEM Z2"4 RETURN 
GOSUE 5000 FRINT "ITEM 3° KETURN 
GOSUE 5000% FRINT "ITEM 4°"3 KETURN 
VTAE 20 


FRINT ",,,EXECUTION DE L'";5 
RETURN 
ER 
FORMAT 

0 TEXT *: HOME 

0 FRINT TAEC 11)''XX F O K M 

A T xx" 

0 FRINT 3% FKRINI 

Q PRINT "INFUT SIMPLES "$$ INVERSE 


ti LIST 10050: 
0 & INFUT A$ 


NORMAL. 


FRINT "AVEC LABELS "$i 

LIST 10070! NORMAL 

& INPUT E$,"ESSAT “ 

FRINT MAVEC FORMAT: "53 
‘ LIST 10090 NORMAL 


100460 


10070 
10080 


10090 & INFUT C+$,L20 
10100 FRINT "FORMAT, TAEULATION, LA 
ÉEL$"$# INVERSE % LIST 10110: 
NORMAL 
10110 & INFUT D?#,L100,V24,H4,"D 
EMONSTRATION:" 
19120 FRINT "FASSAGE DE FARAMETRE 
+ L 
10150 INVERGE $ LIST 10140,10150! 
NORMAL 
10140 À = 10$E «= 2440 = 4 
10150  &  INFUT E$,HA,VE,LC, "DEMO: 
10191 FRINT 
10160 HOME 
10161 HTÂAE 8% FRINT "XX ACCES DIS 
QUE AMELIORE xx'"5 FRINT 
10165 F$ = "FROGK DEMO TEMF" 
10170 D$ = CHRK#& (4)5 FRINT D$'"'MON 
C1, 0" 
10171 FARINT DS£$"OFEN "F4 
10172 FRINT DS"NRITE"F# 
101723 FRINT A$! FRINT E$? FRINT C 
b+ FRINT DZ$3 FRINT E$ 
10174 FRINT D$"CLOSE" 
10175 FRINT D$"OFEN"F# 
10176 FRINT D$"READ'F# 
10EZ7" FOR Æ $ % TO 9 
10178 & INFUT A$CI)D$ NEXT I 
10179 FKRINT D$'"CLOSE" 
10220 &  HWAIT 
10222 REM DANS L‘INSTRUCTIUN 
10223 REM ‘FORMAT’ LA VARTAELE ES 
ï 
10224 REM EN FREMIERE FOSITION 
10225 REM LE LAEEL EN DERNIERE 
10226 REM TANDIS QUE L'ORDRE DES 
10227 REM FARAMETRES NUMÉRIQUES 
10228 REM EST LIERE 
10235 HOME 
19990 REM sms 
KECAFITULATION DES 
NOUVELLES COMMANDES 
20000 TEXT : HOME 
20010 PRINT " RECRAPFITUL 
ñ TE SUP 
20015 FRINT “ -FORMAT DES INSTRU 
CTIONS-" 


20020 PRINT Mn 


20040  FRINT "INFUT AVEC FORMATI": 
PRINT 

PRINT " & INPUT A$,L<LONGUE 
UR% 4 VEVTAES ,HEHTAES," CHR$ (3 


20059 
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INVERSE 


INVERSE 


4)"TEXTE" CHK$ (34) 
20060 FRINT ? FRINT "MENUS"+ FRINT 


20070 FRINT " & LET AX;,<VTAE:, “MA 
RGE ; ÉLARG, %, ENER&" 
20080 PRINT ? FRINT "AMFER G0:"3 FRINT 


20090 FRINT " & GOTO EXFRESSION" 
20100 FRINT “ & GOSUE EXFRESSION" 


20110 PRINT ? FRINT "ATTENTE!"S FRINT 


20120 FRINT “ & WAIT" 


1 CMD KCME DID DC DCE DCE DIE DCE DC OK CIE KE 
2 Meme om oo om om ame om a oo x 
3 x * 
4 x FROGRAMMATION x 
5 x FACILITEE x 
6 x me * 
7 x FAR DENIS SUREAU x 
8 * x 
9 M x 
10 KO HKOKHMEKOK OK KO KO DOC OC K 
LE 

12 KK DECO DICO OK OK KO DK DK OK DK OK OK DK OK DK OK K 
13 xx XX 
14 XX FORMAT XX 
15 KX XX 
16 MOKOKOKOKK HORDE HKOKOOKOK OK 
17 


18 FORPNT EQU $0085 
19 CHRGET EAU $00E1 
20 TXTFTR EQU $00E8 
2i GETEYTC EQU $E6F5 
22 FRMNUM EQU  $DD67 
23 FTRGET EQU  $DFE3 
24 PRINT EQU  $FDED 


25 ES EQU $FC10 

Z.6 VTAE EQU $FC22 

27 CHKSTRKR EQU  $DD6éC 

28 MAK EQU $E3E9 

29 SAVD EQU  $DA9A 

30 SETNORM EQU $FE84 

31 

32 LONGUEUR EG  #+0009 

33 

34 ORG $9300 

35 
9300: À9 4C 36 INIT LDA  +$4C 
9302: 8D F5 03 37 STA $3F5 
9305% À9 1E 38 LDA  +#<SELECT 
9307: 8D F6 03 39 STA +#3F4 
9304: A9 93 40 LDA  Æ>SELECT 
930C; 8D F7 03 41 STA $3F7 
930F?t A9 00 42 LDA #<INIT 
93112 85 73 43 STA $73 
9313: À9 93 44 LDA  #>INIT 
9315° 85 74 45 STA $74 
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9317: 60 46 RTS 
47 
9318! 07 48  INTERLN HEX 027 
9319: BE 49 FLECHE ASC “> 
9314t 80 50 DUREE HEX 80 
Si 
931H+ C9 84 52 SELECT  CMF  +#$684 SELECTION 
931D? F0 1D 53 BEQ INPUT XDE LA 
931F? C9 AE 54 CMF  +$AE XROUTINE 
9321: F0 13 55 BEQ GO 
9323! C9 E0 56 CMF +660 
9325: F0 12 57 BEQ SUE 
9327: C9 E5 58 CMF  #$E5 
9329! F0 08 59 EEQ WT 
93ZE: C9 AA 60 CMF  +$AA 
932D! DO 03 61 BNE RTSSEL 
93?2F? 4C 4E 94 62 JMF MENU 
9332: 60 63  RTSSEL RTS 
9933? 4C 2F 94 64 WT JMF  KAIT 
9336? 4C FF 93 65 GO UMF AMFGO 
9339: 4C 05 94 66  SUE UJMF  AMFSUE 
67 
9330! A4 25 68  INFUT LDY $25 
933E: 84 07 69 STY #7 
9340?! A4 24 70 LDY +24 
9342: 84 08 71 STY #58 
9344: A9 00 72 LDA +#$00 
9346! 85 09 73 STA LONGUEUR 
9348: 85 06 74 STA $6 
9344: 20 Fi 00 75 JSR  CHRGET XRECHERCHE 
934D! 20 E3 DF 76 JSR FTRCGET XDU NOM DE 
9350: 20 6C DD 77 JSR  CHKSTR XVARIAELE 
9353: 85 85 78 STA FORFNT DANS LA 
9355! 84 84 79 STY FORFNT+1 XTAËLE 
80 
9357+t A0 00 81 12 LDY 4##00 KENTREE 
9359! Ei E8 82 LDA CTXTFTR),Y XDES 
935E+ C9 2C 83 CMF  #$2C XFARAMETRES 
935D+ DO 35 84 ENE TAE 
935F? 20 Fi 00 85 JSR  CHRGET 
9362: C9 4C 86 CMF  +#$4C 
9364t FO 14 87 BEQ  INFTL 
9366! C9 546 88 CMF +456 
9368: F0 18 89 ÉEQ INFTV 
9364: C9 48 90 CMF +648 
936C? F0 10 gi ÉEQ  INFTH 
936E: C9 22 92 CMF  +#+$22 
| 9370? DO 05 93 ENE  JMFERR 
9372! Eé 06 94 INC $6 
| 9374: 4C 94 93 95 JF  TAE 
9377? 4C 8D 94 96  JMFERRK  JMF  ERK 
9374! 20 F5 E6 97  INFTL JSR GETEYTC 
937D: 86 09 98 STX LONGUEUR 
937F? 4C 57 93 99 JMF IZ 
9382! 20 F5 E6 100 INFTU USR GETEYTC 
9385: CA 101 DEX 
9386! 86 07 102 STX #7 
9388: 4C 57 93 103 UJMF  IZ 
| 938E+ 20 F5 Eé 104 INFTH UJSR GETEYTC 
938F! CA 105 DEX 
| 26 
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9391: 40 97 98 


939C? 20 22 FC 


93BC; 20 84 FE 


93C1: 20 ED FD 


9309: 20 10 FC 


93D2% 20 6F FD 


93D8: ED FF 01 


93DF+ BD FF 01 


93E4; 9D FF 01 


93F9: 20 SA FF 
93FCi: 4C DO 03 


122 


123 


126 
127 
128 


130 
131 
132 
133 
134 


148 
149 
150 
151 


152 


É94 
155 


TAE 


STRING 


RTSSTR 
FOKMAT 


FORMTZ 


FORMT3 


GTLIN 


GTLIN2 


AFFECTE 


GTRTS 


STOF 


KKKKKKKAKMEKMMKEEMMEEMRK 


XX 


XX AMFER 


X*x 


STX #8 
JMF T2 
LDA #7 
STA #25 
LDA $8 
STA $2 
JSR  VTAE 
LDA $6 
EEQ FORMAT 
JSR  CHKGET 
CMF  #+$27 
EEQ RTSSTKR 
ORA +#+#$00 
JSK  FRINT 
JMF STRING 
JSK  CHKGET 
LDX LONGUEUR 
EER GTLIN 
LDA $32 
FHA XDE 
JSR  SETNORM 
LDA +#"," 
JSR  FRINT 
DEX 
ENE  FORMT2 
LDX LONGUEUR 
USR ES 
DEX XEN 
ENE FORMT3 
FLA  XINITIALE 
STA #32 
JSK  $FD6F 
TXA  XDES 
EEQ GTRTS 
LDA $1FF,X 
CMF. +403 
EEQ STOF 
LDA #1FF,X 
AND +#+$7F 
STA $1FF;,X 
DEX  X7 
ENE  GTLINZ 
LDA ++00 
LDY +402 
LDX  +$8D 
JSR  MAK 
JSK  SAVD 
LDX +#+$00 
RTS 
JSR $FF3A 
UMF $3D0 
XX 
G O xx 
XX 


KXKKKKKKKKMAKKMMKMMMKMMK 


GETADKR 


EQU $E752 
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XFOSTTION 
XVERTICALE 
XEN $25 

XET EN #24 
XHORIZONTALE 


XAFFICHAGE 
XDU 
XLAEEL 


XECRITURE. 
xD'UNE 
XLIGNE 


XFOINTS 


XFUTS 
XRETOUR 


XFOSITION 


XENTREE 
XDONNEES 


XCTRL-C? 


XON MET 
XLE EIT 
xD’ ORDRE 
A 0 
XZERO 


XTRANSFERT 
XDU EUFFER 
xD'ENTREE 
XVERS LA 
MEMOIRE 


XETF 
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166 GOTO EQU $D941 
167  CHKSTK EQU  $D3D4 
168 CURLIN EQU #$0075 
169 NENSTT EAU  $D7D2 


170 x 
93FF? 20 25 94 171 AMFGCO JSK  AMFRTN 
94072% 4C 41 D9 172 UMF GOTO 
9405: 20 25 94 173 AMFSUE JSK  AMFRTN 
9408: A9 03 174 LDA +#+$03 
9404 20 Dé D3 175 USR  CHKSTK 
940D% ÀS E9 176 LDA TXTFTKR+1 
940F; 48 177 FHÀ 
9410: ÀS E8 178 LDA TXTFTR 
9412: 48 179 FHA 
94135 AS 76 189 LDA  CURLIN+1i 
9415: 48 181 FHA 
9416: A5 75 182 LDA CURLIN 
9418: 48 183 FHA 
9419; A9 E0 184 LDA +$E0 
941H: 48 185 FHA 
941C; 20 E7 00 186 UJSR  $E7 
941F+t 20 41 D9 187 JSR  GOTO 
9422? 4C DZ D7 188 UMF' NEWSTT 
94253 20 Eli 00 189 AMFRTN SK  CHRGET XEVALUATION 
9428t 20 67 DD 190 JSK  FRMNUM XDE LA 
942B: 20 52 E7 191 USR  GETADRK XFORMULE 
942E+: 60 LITE KTS 
193 
194 XXXXMAKMMMOM KM MOMOMOMUKKMKK 
195 XX WHAIT XX 
196 OO CO OK DE DC DICOC DICO CCC 
197 
942F$ 20 Fi 00 1978 WATT USR  CHRGET 
9432: A2 FF 199 LDX #$FF 
94343 2C 10 C0 200 EIT %$C010 
9437: CA 201 MAITRE DEX 
9438: F0 13 202 ÉEQ  KRTSWT 
9434: AC 1À 93 203 LDY DUREE 
943Dt 68 204 WMAIT3 DEY 
943E: F0 F7 205 EER WAITZ 


206 X$FCAS EST LA BOUCLE D'’'ATTENTE 
207 xXDU MONITEUR,FONCTION DE À 


9440! A9 DA 208 LDA #10 
9442: 20 A8 FC 209 JSK  $FCA8 
9445; 2C 00 C0 210 EIT %C000 XUNE 
9448: 10 F3 211 EFL  WAIT3 XTOUCHE 
9444: 2C 10 C0 212 EIT $C010 XFRESSEE? 
944D: 60 213 KTSHT RTS 

214 

215  KXXXXKKKKERKARAMMKMKMMAEK 

216 XX XX 

217 XXS E L E C T I O Nxx 

218 xx XX 

219 KXKXKKMKMMEMMMMHMKAUK MU 

220 

221 KED EQU +C000 


222 KEDSTRE EQU #$C010 
223 VAKFNT EQU $0083 
224 CHKNUM EQU  $DD6éA 
225 HAUT EQU 0008 XLIGNE 1 
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226 

227 XNUMOFTS NUMERO DE L'OFTION 

228 X OU SE TROUVE LE CURSEUR 
2297  NUMOFT EQU $0009 

230 NOFT EQU $000E XNER D'’OFT, 


231 NOFTZ EGU $000C 
232 SETINV EQU $FE60 
233 FRERR EQU $FF2D 


234 CV EQU +$0025 
235 
236 xx DEFINITION DE LA VARTAELE 
237 
944E$% 20 E1i 00 238 MENU USR  CHRGET 
9451! 20 E3 DF 239 JSK FTRGET 
9454; 48 2.40 FHA  XSAUVEG, 
94551 98 241 TYA  xDE 
9456: 48 242 FHA  XxL'’ADRESSE 
243 
244 xxx ENTREE DES FARAMETRES 
245 
J4N73 20 F5 E6& 246 USR GETEYTC XVTAE 
9454: CA 247 DEX 
945E; E0 18 248 CFX +24 
945D; E0 ZE L47 ECS ERK 
945F: 86 08 250 STX HAUT 
94615 20 F5 E6 251 UJSR GETEYTC XMARGE 
9464; SA 252 TXA 
9465: F0 26 253 ÉEQ ERK 
94673 CA 254 DEX 
79468; 86 06 299 STX $é 
9464: 20 F5 E6 256 JSR GETEYTC XLARCG 
946D; 8A 257 TXA 
946E; 18 258 CL.C 
946F: 65 06 259 ADC $6 
9471: C9 29 260 CMF +41 
9473: E0 18 261 ECS ERK 
9475: 95 07 262 STA #7 
94772 20 F5 Eé 263 USK GETEYTC XNER OF: 
9474: 86 DE 264 STX  NOFT 
947C: E8 265 INX 
947D: 84 266 TXA 
947E$ 09 E0 267 ORA +$E0 
9480: 85 0C 268 STA NOFT2 
94823 A9 01 269 FREMOFT LDA #$1 XINITIAL, 
9484; 85 097 270 STA  NUMOFT 
9486: À5 08 271 LDA HAUT 
9488: 85 25 272 STA CV 
9484: 4C C3 94 273 JMF  EARRINY 
274 
948D; 20 84 FE 275 ERK JUSR  SETNORM 
9490% 20 2D FF 276 JUSR FRERK XAFFICHE 
9493: 4C D0 03 277 JMF  $3D0 X'ERR'’ 
278 x 
9496? 00 279 FLECHEZ HEX 00 
280 
281 xxx MONTEE DU CURSEUR 
282 
94971 20 15 95 283 MONTRIN JSK EARRNOKRM 
9494 ÀS 09 Z84 LDA  NUMOFT 
FASCI C7 02 285 CMF +52 
29 
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ECS MONTRKT2Z 
LDA HAUT 
LDY  NOFT 
DEY 
MNTLOOF CLC  XSAUT 
ADC  INTERLN 
DEY  XDERNIERE 
ENE  MNTLOOF 
STA CV 
LDA  NOFT 
STA  NUMOFT 
UMF EAKRINV 
MONTRTZ JSK  EAKRNORM 
LDA CV 
ADC +$0 
SEC  INTERLN 
STA CV 
DEC  NUMOFT 
EARRINVU JSK SETINU 
LDA FLECHE 
STA FLECHEZ 
JSK  EARR 
CLAV EIT KEDSTKRE 
ECLECLAV EIT KED 
EFL ECLCLAU 
LDA  KED 
EIT KEDSTKRE 
CMF +695 
ÉER DESRTN 
CMF  +$88 
ÉEQ MONTRTN 
CMF  +#+$9E 
ÉER ESCAFE 
CMF +$8D 
EER AFFECTEZ 
CMF  +$E1 
ECC  ECLCLAU 
CMF  NOFT2Z 
ECS ECLCLAV 
AND +6F 
STA  NUMOFT 
XXX TRANSFERT DU NUMERO 
xxX DANS LA VARIABLE 


AFFECTEZ FLA 


GIVAYF 
MOUMF 


STA  VAKFNT 
FLA 

STA VARFNT+I 
EQU $E2F2 
EQU  $EE2E 
LDA +#+$00 

LDY  NUMOFT 
JSR GIVAYF 
LDX  VAKPNT+I 
LDY  VARFNT 
JSK  MOVMF 
LDA +#+$0 

Pom's n° 5 


XEN 


XLTGNE 


XATTENTE 
xDU 
XCLAUTER 


x£-7? 


xXESC? 


XRTN? 


XUN 
XCHIFFRE? 





XINT>FAC 


XxFAC>MEM 


a ————— 


950F+ 85 24 346 
9511: 20 94 FE 347 
9514: 60 348 
95151 20 99 FE 349 
9518: A9 A0 350 
9515 8D 96 94 351 
951D5 20 50 95 352 
9520! 60 353 
359 
9395 
356 
93215 20 15 975 397 
9524$ A5 09 358 
9526: C5 0E 359 
9328: 70 03 360 
952A$ 4C 62 94 361 
952D$ A5 25 362 
952F+ 18 363 
9530 6D 18 93 364 
95333 95 25 365 
9535: Eé 09 366 
905374 4C C3 94 367 
9534: 20 58 FC 368 
930% 20 94 FE. 367 
9540+ 4C DO 03 370 
95435 ÀS 25 371 
9549% C9 18 372 
9547: 90 04 373 
95493 A9 17 374 
954Ë% 685 25 9759 
954D: 20 22 FC 3764 
9550: A4 06 377 
9992: C4 07 378 
9554+: DO 06 379 
9556: AD 96 94 380 
90971 91 28 381 
955E? 60 382 
9550: E1 28 383 
959E+ 09 80 384 
9560: 25 32 385 
9562: 91 28 386 
9564: C8 387 
9565: C4 07 388 
95673 90 F3 3897 
7956974 60 39 0 
Récapitulation !18K 
9300- À9 4C 8D F5 03 
9308- Fé 03 À7 73 8D 
9310- 00 85 73 A9 93 
9318- 02 BE 80 C9 84 
9320- AE F0 13 C9 E0 
9328- E5 F0 08 C9 AA 
9330-— 4E 94 60 40 2F 
9338- 93 4C 05 94 À4 
9340- A4 24 84 08 A9 
9348- 85 06 20 E1 00 





STA +24 
RTS JSR SETNORM 

RTS 
EARRNORM JSR SETNORM 

LDA +#+$4A0 

STA FLECHEZ 

JSR  EARR3 

RTS 
xxx DESCENTE DU CURSEUR 
DESRTN UJSR  EARRNORM 

LDA  NUMOFT 

CMF  NOFT 

ECC DESRT2 

JMF  FREMOFT 
DESRT?Z LDA CV 

LE 

ADC  INTERLN 

STA CV 

INC  NUMOFT 

JMF  EARRINU 
ESCAFE JSK  $FC58 

USR  SETNORM 

JMF  +3D0 
EARR LDA CV 

CMF #2 

ECC  EARRZ 

LDA +23 

STA CV 
EARR2 JSR  UTAE 
EARR3 LDY $é6 

CFY #7 

ENE  EARRHRT 

LDA FLECHEZ 

STA (#$28),Y 
RTSEARR RTS 
EARRHRT LDA ($28),Y 

ORA +$00 

AND +32 

STA ($2Z8),Y 

INY  XNORMAL 

CFY +7 

ECC  EARRHRT 

RTS 

9350- 20 6C DD 
0358- 00 Ei E8 

A9 1B 8D 93460- Ei 00 C9 
F7 03 À7 9368- F0 18 C9 
85 74 460 9370- D0 05 Eé 
FO 1D C9 9378- BD 94 ?0 
F0 12 C9 9380- 57 93 20 
DO 03 4C 9398- 4C 57 93 
94 4C FF 9390- 08 4C 57 
25 84 07 9398- A5 08 85 
00 85 09 9340- 06 FO 12 
20 E3 DF 9348- F0 08 09 


XARKRET 


XREECRITURE 
XEN 
XINVERSE 
XOU EN 














93E0- À3 793 20 Ei 00 ÀAé 09 F0 9490- 20 2D FF 4C D0 03 00 20 
93EÈ8- 19 AS 32 48 20 84 FE A9 9498- 15 95 A5 09 C9 02 50 15 
93C0- ÀE 20 ED FD CA D0 FA À6 9440- ÀG5 08 À4 0B 89 18 6D 18 
93C8- 09 20 10 FC CA D0 FA 68 90448- 93 98 DO F9 85 25 A5 0E 
93D0- 85 32 20 &6F FD 8A F0 1E 94E0- 85 09 4C C3 94 20 15 99 
9308- ED FF 01 C9 83 F0 1A ED 9488- À5 25 69 00 ED 18 93 85 
93E0- FF 01 29 7F 9D FF 01 CA 94C0- 25 Cé 09 20 80 FE AD 19 
93E8- D0 F5 49 00 40 02 À? 8D 94C8- 93 8D 96 94 20 43 95 2C 
93F0- 20 E9 E3 20 9A DA ÀZ 00 94D0- 10 C0 2C 00 CO 10 FEË AD 
93F8- 60 20 34 FF 4C D0 03 20 94D8- 00 C0 ?2C 10 CO C9 95 F0 
9400- 25 94 4C 41 D9 20 25 94 94E0- 40 C9 88 F0 E2 C9 96 F0 
9408- À9 03 20 Dé D3 ÀS E9 48 94E8- 51 C9 8D F0 0C C9 E1 90 
9410- À5 E8 48 À5 76 48 ÀS 75 94F0- Ei C5 0C E0 DD 29 0F 85 
9418- 48 A9 E0 48 20 E7 00 20 94FB- 09 68 85 83 68 85 84 A9 
9420- 41 D9 4C DZ D7 20 E1i 00 9500- 00 A4 09 20 F2 E2 A6 84 
9428- 20 67 DD 20 52 E7 60 20 9509- A4 83 20 2E EE A9 00 85 
| 9430- E1 00 AZ FF 2C 10 CO CA 9510- 24 20 84 FE 60 20 84 FE 
9438- F0 13 AC i4 93 88 F0 F7 9519- A9 A0 8D 96 94 20 50 95 
9440- A9 0 20 À8 FC 2C 00 C0 9520- 60 20 15 95 ÀS 09 CS 0E 
9448- 10 F3 2C 10 C0 60 20 F1 9528- 90 03 4C 82 94 ÀS 25 18 
9450- 00 20 E3 DF 48 98 48 20 0530- 6D 18 93 85 25 Eé6 09 40 
9459- F5 Eé CA E0 18 E0 2E 86 9538- C3 94 20 58 FC 20 84 FE 
9460- 08 20 F5 Eé 8A F0 Zé CA 9540- 4C DO 03 AS 25 C9 18 90 
9468- 86 06 20 F5 Eé 84 18 65 9549- 04 ÀA9 17 85 25 20 22 FC 
9470- 06 C9 29 E0 18 85 07 20 9550- A4 06 C4 07 DO 06 AD 96 
9478- F5 Eé 86 06 E8 8A 09 E0 9558- 94 91 26 60 Ei 28 09 80 
9480- 85 0C À9 01 95 09 AS 08 9560- 25 32 91 28 C8 C4 07 90 
9488- 85 25 4C C3 94 20 84 FE 9568- F3 60 
RECAPTTULATION HEXADECIMALE : VERSION 32K 

5300- A9 4C 8D F5 03 A9 1E 8D 5438- FU 13 AC 14 53 88 F0 F7 

5308- Fé6é 03 A9 53 8D F7 03 A9 5440- A9 OA 20 A8 FC 2C 00 C0 

59310- 00 85 73 À9 53 85 74 60 5448- 10 F3 ?2C 10 C0 60 ?0 E1 

5318 02 EE 80 C9 84 FO 1D C9 5450- 00 20 E3 DF 48 98 40 2 

5320- AE F0 13 C9 E0 F0 12 C9 5458- F5 Eé6 CA EU 18 EU ZE 86 

5328- ES F0 08 C9 AA DO 03 4C 5460- 08 20 F5 Eé 8A F0 246 CA 

5330- 4£ 54 60 4C 2F 54 AC FF 5468- 86 06 20 F5 Eé 8A 18 65 

5338- 53 4C 05 54 A4 25 684 07 59470- 06 C9 29 60 18 85 07 2 

5340- A4 24 84 08 À9 00 85 09 5478- F5 E6 86 0Ë E8 8À 09 F0 

5348- 85 06 20 Ei 00 20 E3 DF 5480- 85 OC 49 01 85 09 A5 08 

5350- 20 6C DD 85 85 84 96 A0 5488- 85 25 4C C3 54 20 84 FE 

5359- 00 Ei E8 C7 ZC DU 35 2 5490- 20 2D FF 4C DO 03 00 20 

5360- Fi 00 C9 4C F0 14 C9 56 5498- 15 55 AS 09 C9 02 KO 15 

59360 F0 18 C9 48 F0 1N C9 22 S4A0—- AS 08 A4 0E 88 18 46D 184 

5370- D0 05 Eé 04 4C 94 53 4C S5448- 59 09 DO F9 685 25 ÀS 0E 

5378- 8D 54 20 F5 Eé 86 09 AC S5480- 85 09 4C C3 54 20 15 35 

5380- 57 933 20 F5 Eé6 CA 86 07 5468- A5 25 69 00 ED 18 53 85 

5388- 4C 57 %93 20 F5 Eé CA 86 54C0- 25 Cé 09 20 80 FE AD 19 

5390- 08 4C 57 53 ÀS 07 85 25 54C8- 53 8D 76 54 20 493 55 2C 

5398- AS 08 85 24 20 22 FC ÀS 54D0- 10 CU Z2C UU C0 10 FE AD 

53N0- 06 F0 12 20 E1i 00 C9 22 54D8- 00 C0 2C 10 C0 C9 95 F0 

5348- F0 08 09 80 20 ED FD 4C 54E0- 40 C9 88 F0 E2 C9 9E F0 

5360- À3 53 20 E1 00 A6 09 FU 54E8- 51 C9 8D F0 OC C9 E1 90 

5388- 19 A5 32 48 20 84 FE A9 54F0- Ei C5 0C E0 DD 29 0F 85 

59C0- AE 20 ED FD CA DO FA A6 54F8- 09 68 95 83 68 85 84 A9 

53C8+ 09 20 10 FC CA D0 FA 68 5500- 00 À4 09 20 F2 E2 Àé 81 

53D0- 85 32 20 6F FD 8A F0 1E 5508- A4 83 Z0 Z2B EE A9 00 85 

S5308- ED FF 01 C9 83 F0 14 RD 5510- 24 20 84 FE 60 20 84 FE 

53E0- FF 01 29 7F 9D FF 01 CA 5518- A9 A0 8D 96 54 20 50 55 

53E8- D0 F5 À9 00 A0 02 AZ 8D 5520- 60 20 15 55 ÀS 09 CS 06 

53F0- 20 E9 E3 20 9A DA A2 00 5528- 90 03 4C 82 54 A5 25% 18 

53F8- 60 20 3A FF 4C DO 03 20 5530- 60 18 53 85 25 Eé6 09 4C 

5400- 25 54 4C 4i D9 20 25 54 5538- C3 54 20 58 FC 20 84 FE 

5408- A7 03 ZU Dé D3 ÀS E7 48 5540- 4C D0 03 ÀS 235 C9 18 90 

5410- A5 E8 48 A5 76 48 A5 75 5548- 04 A9 17 95 25 20 22 FC 

5419- 48 A9 E0 48 20 E7 00 20 5550- A4 06 C4 07 D0 06 AD 96 

5420- 41 D9 4C DZ D7 20 E1 00 5558- 54 91 28 60 E1 28 09 80 

5428- 20 67 DD 20 95Z E7 6U ZU S360- 25 32 91 28 C8 C4 07 90 

5430- R1 N0 A2 FF 2C 10 C0 CA 5568- F3 60 
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La carte 128KDE de Legend Industries LTD. 
est le résultat des technologies les plus 
récentes: sur la taille d'une carte langage, 
on peut maintenant faire tenir 128K. Aupara- 
vant, Legend ne fournissait que des cartes 
64K. Bien entendu, le microprocesseur 6502 de 
l'Apple IIne peut adresser lui-même les 128K 
de la carte, mais seulement un morceau de 16K 
(adresses $D000 à S$FFFF). Pour changer la 
partie adressée, il suffira de stimuler des 
adresses (faire un SWITCH), 


Cette carte peut aussi bien être placee 
dans le slot 0 à la place de la carte langage 
ou d'une RAMCARD de 16K que dans n'importe 
quel autre slot, à l'exception du slot 7 
(réservé pour les cartes couleur) pour les 
Apples Europlus. 


Le hardware de cette carte est relative- 
ment aisé à comprendre: il s'agit de l'équi- 
valent de 8 cartes langage en parallèle et le 


passage de l'une à l'autre s'effectue par un 
SNITCH. En effet, la carte est formée de 8 
blocs (banks) de 16K. Ine fois qu'un bloc est 
sélectionné, on peut l'adresser comme une 
carte langage: il possède lui-même ? hanks 
allant des adresses $D000 à $DFFF et une 
partie commune de $E000 à $FFFF, et l'on peut 


l'écriture ou à la lecture de ces 
stimulant les mêmes adresses que 


accéder à 
adresses en 


pour une RAMCARD ($C080 à $CO84 el $C088 à 
$CO8B pour le slot 0 = ajouter $i0 pour le 
slot numéro i). Puis, pour passer d'un bloc 


de 16K à l'autre il suffit de mettre dans 
l'adresse $C084 + $i0 le numéro du bloc (de O0 
à 7). Lorsque la carte est placée dans le 
slot 0, le bloc O0 est l'équivalent de la 
carte langage: c'est sur lui que sera chargé 
le langage qui ne réside pas en ROM. 


Cette carte serait moyennement utile si 
elle n'était munie d'aucun logiciel, mais 
Legend a développé pour cette carte un 


logiciel d'un très grand interêt. Ce logiciel 
est principalement constitué de 3 programmes: 
VC PLUS, DISK EMULATOR et MEMORY MASTER. On 
peut utiliser ces programmes de deux manières 


différentes: soit en les BRUNnant (dans ce 
cas 11s demandent à l'utilisateur les 
paramètres dont ils ont besoin), soit dans un 


programme automatique (TURNKEY) qui peut être 
utilisé en bootant (dans ce cas un programme 
Applesoft fait des POKEs dans la routine en 


VC PLUS permet d'adapter Visicalc aux car- 
tes 128K. La présence d'une carte porte 
l'espace de travail à 145K; il est de 85K 
avec la carte 6ÙK aussi commercialisée par la 
même société. 


Le programme DISK EMULATOR permet de 
simuler un drive "fantôme" (dont les numéros 
de slot et drive peuvent être quelconques, à 


pas correspondre à un drive 

serait déconnecté) en 
Legend comme mémoire de 
masse. En effet, le contenu d'une disquette 
cst cxactement de 128K (pistes 3 à 34), si 
l'on excepte le DOS qui se trouve sur les 
pistes 0, 1 et 2. Le DOS possède alors deux 
commandes supplémentaires qui agissent en 
moins de 20 secondes: 


condition de ne 
existant, qui sinon 
utilisant la carte 


.Mi,Ss,Dd (MOUNT) recopie le contenu du dri- 
ve d, slot s dans la carte 128K du slot i 

.Ui,Ss,Dd (UPDATE) recopie le contenu de la 
carte dans le drive. 

Notons que si la carte est située dans le 
slot O et que l'on désire réserver le premier 
bloc de la carte pour le langage non résident 
en ROM, seules les pistes 7 à 34 du drive 
fantôme seront utilisées. Pour pouvoir dans 
ce cas se servir des commandes MOUNT et 
UPDATE, il faut formater des disquettes qui 
n'utilisent pour le stockage des données que 
les pistes Ÿ à 34. Cela peut être réalisé 
avec le programme SPECIAL FORMATTER, qui en 
fait ne consiste qu'à faire avant 
initialisation POKE-20813, U*(piste du début) 
et POKE-20811,4*(1+piste de la fin). 


l'émulateur de disque 
permet de charger presque instantanément les 
plus gros programmes ct de diviser par 3 le 
temps d'écriture ou de lecture des fichiers 
TEXT. Mais il ne faut pas perdre de vue que 
le disque émulé reste une mémoire volatile et 
qu'il faut donc souvent sauvegarder le fruit 
de son travail. 


L'utilisation de 


Le programme MEMORY MASTER permet de 
recopier la majorité du DOS dans un des blocs 
de 16K de la carte Legend, La HIMEM est alors 
portée à $B800, ce qui laisse UK dans la 
mémoire centrale pour écrire des programmes, 
Notons que MEMORY MASTER peut être utilisé 
par les Apples munis simplement de la carte 


langage machine et termine par un CALL), langage (à ce moment-là, on ne peut plus 

Notons que ces logiciels sont prévus pour (Utiliser le langage en RAM). Ce programme 

utiliser jusqu'à mn cartes Legend reste compatible avec tous ceux qui se 

simultanément et qu'ils sont incompatibles °°ntentent d'appels au DOS par 

entre eux. l'intermédiaire des commandes DOS ou des 
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D 








adresses de la page 3. 


Les commandes suivantes sont alors ajou- 


tées au DOS: 


.F (FLIP) permet de passer de DOS 3.3 en DOS 
3.2 et vice-versa (sans effacer le pro- 
gramme en mémoire!) 

.S (SHOW) montre la version de DOS utilisée 
.R (BSTAT) fournit l'adresse hexadécimale du 
début et la longueur du dernier fichicr 

BLOADé ou BRUNné 
.M (MONITOR) fait entrer dans le moniteur. 


Signalons enfin les programmes FIRMWARE 
SELECT qui modifie le DOS sur une disquette 
pour lui indiquer la présence dans un slot 


donné d'une ROMCARD Integer ou Appiesoft, 
HIRES DEMO qui fait une démonstration par 
chargement d'images graphiques de la vitesse 
de la carte 128K comparée au disque et Legend 
SLIDE SELECT qui simule un projecteur de 


diapositives. 

Un mot à propos du DOS booté par la dis- 
quette 128KDE DEMO: il charge très rapide- 
ment les programmes binaires et Basic, a la 
manière du & BLOAD de Pom's 4. De plus il 
charge automatiquement sur la carte langage 


ou sur le bloc U d'une carte Legend située 
dans le slot 0 le langage non résident en ROM 
(à moins que celui-ci ne soit déjà chargé). 
D'ailleurs, l'Integer et l'Applesoft ne sont 
pas fournis par des fichiers mais sont di- 
rectement cherchés par le DOS booté sur les 
pistes 3 à 7 de la disquette, pistes sur 
lesquelles on ne peut pas sauver des fi- 
chiers. Ce DOS peut être utilisé par initia- 


lisation ou être recopié sur les pistes 0 à 2 
d'une disquette comme indiqué par J.F. 
Duvivier dans Pom's 2 (MASTER CREATE ne 


marche pas). 


Les produits Legend sont distribués en 
France par B.I.P. (22, rue Joseph Dijon - 
75018 Paris) à qui nous devons l'excellente 
idée d'une traduction en français du mode 


d'emploi américain qui est d'ailleurs très 
clair (sauf en ce qui concerne l'ins- 
tallation d'une carte ailleurs que dans le 
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glot O0). La traduction n'est malheureusement 
pas parfaite: elle a été, comme l'original, 
rédigée sur un système de traitement de texte 
et on peut s'étonner de l'absence des accents 
(alors que la plupart des imprimantes en ont 
- cf. les articles de Pom's) et de l'absen- 
ce du mode de justification à droite et à 
gauche (i1 n' y a qu'une justification à 
gauche). Depuis peu, la société RBIP propose 


la documentation sur disquette en AppleWri- 
ter I ou Il, ce qui permet à chacun d'avoir 
sa udocumentatiun personnalisée et agrémentée 
d'accents 


Sur le plan du fond, la traduction est trop 
littérale ("the system hangs" devient "le 
système est suspendu!" = planté" serait 
meilleur; "you must LOAD the program" devient 
vous devez "LOAD" le programme" - le 
barbarisme LOADer serait plus clair; "you 
re-boot DOS" donne "vous redémarrez DOS" - on 


dit habituellement: le DOS). Notons toutefois 


que, tout au long de la traduction, l'accent 
est mis sur le fait qu'avec les Apples 
Europlus on ne peut utiliser que les slots 0 
à 6, alors que le mode d'emploi américain 


parle des slots 0 à 7. 


En conclusion, il s'agit là d'un produit 
veut se révéler d'une très grande utilité 


gui 

grâce à l'existence d'un excellent logiciel. 
Mais il faudrait adapter pour cette carte 
d'autres programmes que Visicalc. Par 
exemple, il serait intéressant d'avoir une 


adaptation du système de traitement de texte 


Apple Writer. La seule réserve que nous 
pouvons émettre est que le prix de 5600F H.T. 
est un peu élevé, mais c'est dû au prix 
encore important de la mémoire vive. 


Rappelons à titre de comparaison que les 16K 
de RAM pour Apple coûtent environ 500F! 


Nous avons beaucoup aimé la carte 128K en 
Visicalc, ainsi que pour le chargement et 
l'utilisation de programmes en DOS normal. 
Nous avons regretté de ne pas pouvoir l'uti- 
liser avec plus de programmes du commerce. 
Dès que le DOS est modifié, l'utilisateur 
doit être assez compétent pour réaliser les 


"patches" nécessaires ... 


Pom's n° 5 





HAÏFA : un amper-interpréteur complet 


Olivier Herz 





HAIFA (Herz Ampersand Interpreter For 
Applesoft) est, comme son nom l'indique, un 
utilitaire qui permet d'augmenter la capaci- 
té de l'interpréteur Applesoft de l'Apple II 
en utilisant pour cela l'Ampersand (&) qui 


permet d'accéder au langage machine grâce à 


un JMP en $3F5. HAIFA utilise aussi la 
fonction Applesoft USR (0) à laquelle on 
accède par un JMP en $A, JMP programmé par 


les soins d'une routine Ampersand. 


Précisons que HAIFA est spécialement 
destiné être utilisé rogramme 


est donc inutile 
commandes utili- 
lignes de pro- 
remplacements de chaînes de ca- 
programmation des touches avec 
l'Applesoft ou encore les 


clavier: il 
trouver des 
l'édition des 


plutôt qu'au 
d'essayer d'y 
taires comme 
gramme, les 

ractères, la 
des mots-clefs de 
références croisées. 


Notons 
compatible avec 


toutefois qu'HAIFA peut être 
EE 
certains utilitaires de mise 


au point de programmes comme le PLE (voir 
Pom's 1) ou le APA du DOS ToolKit, Vous 
trouverez dans l'annexe 2 toutes les infor- 
mations utiles en ce qui concerne l'emplace- 
ment en mémoire de HAIFA.). Au sujet du 
chargement de HAIFA, prière de se reporter à 


l'annexe 1. 


HAIFA eut__ rendre trois sortes de services 
aux personnes qui programment en Applesoft. 
Primo, # faire tourner les programmes plus vite 
(routines graphiques principalement) Secun- 
do, donner accès à des instructions qui font 
défaut en Applesoft (le GOTO NNN, le IF THEN 
ELSE, etc.). Tertio, simplifier ct compacter 
l'écriture des programmes (& WAl! au lieu 
d'une boucle FOR NEXT pour une pause, tortue 
graphique, etc.). 


qu'HAIFA a été spécialement 
réalisé pour utiliser au mieux les capacités 
d'un Apple II avec Applesoft en KOM et carte 
langage; mais nous avons assemblé une version 
48 K pour que tous puissent en profiter, et 


Remarquons 


ce aux dépens de la place mémoire disponible 
et de la taille des tables utilisées par 
HAIFA, 


HAIFA utilise 
l'Applesoft, 
rappelons-le, 


au maximum les routines de 
mais ne touche pas au DOS qui, 
réside en mémoire vive. En ce 


global, par l'équivalent en langage machine 


de PRINT DS. 


Signalons enfin que les commandes de HAIFA 
utilisent un maximum de mots-clefs de 
l'Applesoft pour des raisons mémotechniques 
et surtout parce que la commande LIST de 
1? Applesoft détache clairement ces mots- 


clefs en les entourant d'espaces. 


LES COMMANDES GENERALES 
La reprogrammation du RESET 


Le RESET 
fournit en 


peut être reprogrammé si on lui 
$3F2 une adresse vers laquelle il 


doit sauter. Pour éviter de rebooter à chaque 
RESET, il faut aussi mettre en $3F4 l'EOR 
entre $3F3 et =-$A5. Voir à ce sujet le manuel 


de référence de l'Apple II. 


Avant ce saut de reprogrammation, le RESET 
effectue quelques commandes sous le contrôle 
du moniteur, Il met en mode TEXT et NORMAL, 
déconnecte les routines spéciales d'entrée/ 
sortie, puis il agit comme CTRL-C F1 Fait 
un bip et indique un BREAK depuis le clavier 
ou un BREAK IN LINE XXX depuis un programme 
(i1 peut aussi dans ce cas être récupéré par 
une routine de ONERR GOTO). Ceci est réalisé 
par un 4JMP à l'adresse $D863, après avoir 
redonné le contrôle entrées/sorties au 
DOS par un .JJMP $3EA. 


des 


reprogrammation offre l'avantage de 
l'utilisaleur de savoir à quel 

a arrêté le programme en appuyant 
C'est particulièrement utile quand 
HAIFA, étant donné qu'il peut y 
routines en langage machine assez 
alors qu'une interruption par CTRL-C 


qu'à chaque nouvelle instruc- 


permettre à 
endroit il 
sur RESET, 
on utilise 
avoir des 
longues, 
n'est testéee 
tion Applesoft. 


L'initialisation 


J& INT Jinitialise HAIFA 


Cette instruction est automatiquement 
réalisée quand on lance HAIFA. Mais il est 
conseillé de l'utiliser au début d'un pro- 


gramme, même si HAIFA est dejà chargé. 


qui concerne les deux commandes DOS de HAIFA, Cette instruction initialise les adresses 

l'une ne fait qu'un appel à RWTS ($3D9), et de début des tables (musique, shapes, carac- 

l'autre utilise des ordres D05 au niveau tères haute résolution...) avec les valeurs 
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standard de HAIFA (voir l'annexe 2). 


De plus, elle initialise la couleur haute 
résolution à O et le numéro de la page haute 
résolution utilisée à 1. (Cela ne sert à rien 
d'initialiser la couleur basse résolution car 
l'octet où est stocké cette couleur est aussi 
utilisé pour autre chose par les routines 
haute résolution de l'Applesoft. 


Enfin, elle effectue les initialisations 
des routines & HGR et autres (voir plus bas) 
sans toutefois ni afficher ni remplir de page 
graphique haute résolution. Au contraire, 
elle met l'Apple II en mode TEXT, efface 
l'écran et met en place la routine normale 
d'entrée/sortie de caractères de HAIFA (voir 
plus bas). 


La pile 


Une grande innovation de HATFA est la pile, 


qui permet d'accéder à un semblant de 
récursivité en autorisant la définition de 
variables locales, 


& PUSH ls [nom de variable] empile le des- 


cripteur de la variable. 
= [nom de variable] dépile 1e des- 


cripteur de la variable. 


f 


Le descripteur occupe 5 octets de la façon 
suivante : 
Réel Entier Chaîne 
exposant :1 valeur :2 longueur : 1 


adresse :2 
inutilisés:2 


mantisse:1À inutiliseés:3 


8i l'on essaye de sortir des limites de la 
pile, on obtient un OUT OF MEMORY ERROR. 


On peut empiler une variable d'un type et 
en dépiler une d'un autre. Les résultats sont 
imprévisibles. 


Attention, si l'on empile une chaîne. La 
chaîne peut ne plus être pointée par une 
variable : un nettoyage de mémoire (garbage 
collection) automatique ou forcé par le pro- 
gramme peut alors l'effacer; un & RECALL 
redonne alors n'importe quoi. 


Les instructions de branchement 


[s AT JTnou de variable entière] note dans lc 
descripteur de la variable l'adresse mémoire 
du début de l'instruction suivante. 


[& TO [nom de variable entière] fait un saut à 
l'instruction pointée par le descripteur de 
la variable. 

Si la variable n'est pas entière, on 
obtient un TYPE MISMATCH ERROR, 


Malgré l'inconvénient de passer sur un & AT 
pour noter la valcur à donner au & TO, ce 
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branchement possède trois avantages sur le 


GOTO : une grande rapidité, la possibilité de 
sauter au milieu d'une ligne et la 
possibilité de s'affranchir G'unnem 0 
















ligne en ne tenant compte que de 2le=2= 


— 


ment dans le programme de l'endroit =. 
dre. 

Notons toutefois que le programmeur ets 
peut se passer du & AT s'il connait Iles 


se mémoire de l'instruction à rejoins. 
suffit alors d'affecter cette vale . 
variable entière. | 


Ces commandes permettent de simule == 
REPEAT UNTIL du PASCAL ainsi que le DO NEs==. 
à condition dans cc dernier cas de conne 


l'adresse du début de la boucle #2 
commencer la boucle par un saut au £es 
fin: 4 
REPEAT & AT I% 

III LIT I 

lIIIII LIT 


IF NOT [expressionl 
THEN & TO 1% 


UNTIL [expression] 


WHILE [expression] IF NOT [expression] 


BEGIN THEN & TO I% 
LIT III II 
END; (position de 1%) 


(& GOTO) Cexpression numérique] est l'instruc- 

tion de l'INTEGER BASIC. 
[expression numérique] 

truction de l'INTEGER BASIC. 


est l'ins- 


Si la ligne cherchée n'existe 
obtient un UNDEF'D STATEMENT ERROR. 


pas, on 





& GOTO NEXT [expression numérique] 
& GOSUB NEXT [expression numérique] 


a S 


C'est pratiquement la même chose, à la 


différence près que, si la ligne cherchée 
n'existe pas, l'instruction renvoie 4 dé 
première ligne ayant un numéro supérieur 
(s'il n'y en à pas, on obtient alors un 


UNDEF'D STATEMENT ERROR). 
Le RESTORE NNN 


& RESTORE [expression numérique] déplace le 
pointeur de DATA. 


Le pointeur se positionne au début de la 
ligne cherchée, Si elle n'existe pas, on 
obtient un UNDEF'D STATEMENT ERROR. Il n'est 
pas nécessaire d'avoir des DATA sur la ligne 


pointée, A la première instructon READ, le 
programme recherchera la première instruc- 
tion DATA suivant cette ligne. S'il n'en 


trouve pas, il affichera OUT OF DATA ERROR. 
& RESTORE NEXT [expression numérique] 


Mêmes remarques que pour le & GOTO NEXT. 





Le listage généralisé 


& LIST ou & LIST , 
gramme. 
& LIST , 


listent tout le pro- 


Cexpression 2] liste du début du 
programme à l'expression 2. 

& LIST [expression 1] , liste de l'expres- 
sion 1 à la fin du programme. 

& LIST [expression 1] , [expression 2] liste 
le programme entre les deux expressions. 


Ces commandes ressemblent à celles de 
l'Applesoft. Toutefois, comme on a des ex- 
pressions numériques, le signe "-" n'est plus 


autorisé à la place de la virgule. Lorsque 
l'expression 1 ne correspond à aucune ligne 
de programme, on obtient un UNDEF'D STATEMENT 
ERROR. Pour y remédier, il suffit de 
remplacer & LIST par & LIST NEXT. Voir à ce 
sujet les remarques du & GOTO NEXT. Lorsqu'il 
n'y à pas d'expression 1, le NEXT donne une 
SYNTAX ERROR, 


Le "INPUT anything" 


& INPUT 
variable] 
& INPUT [nom de 


! [chaîne de caractères] " ; [nom de 


variable] permettent de 


rentrer une chaîne quelconque depuis le 
clavier. 

Même syntaxe que le INPUT Applesoft à la 
différence près qu'on peut rentrer des 
guillemets, une virgule ou les deux points 
sans obtenir le fatidique message EXTRA 


IGNORED : on ne peut par conséquent rentrer 
qu'une seule variable par instruction. 


Si la variable n'est pas une variable de 
chaîne, on obtient un TYPE MISMATCH ERROR, A 
partir du clavier, on obtient un ILLEGAL 
DIRECT ERROR. 


Le GET numérique sans erreur 


Un inconvénient fâcheux de l'Applesoft fait 
que si l'on presse une touche non numérique 
en réponse à un GET dont la variable est 
numérique, on obtient une SYNTAX ERROR. 


& GET [nom de variable] permet d'affecter une 
valeur à la variable. 


La variable doit être réelle ou entière 
sous peine de TYPE MISMATCH ERROR. L'ins- 
truction attend qu'une touche numérique soit 
appuyée. Une autre touche n'a aucun effet. 


& GET + [nom de variable] affecte encore une 
valeur à la variable. 


Ici, par contre, lorsqu'une touche non 
numérique est enfoncée, l'instruction assi- 
gne la valeur 0 à la variable. 


Routine de ONERR GOTO 


& ONERR exécute la routine fournie dans le 





à utiliser 
traitement d'er- 


référence 
sous-programme de 


manuel de Appiesoft, 
dans un 


reur. 


& ONERR + effectue la même routine et envoie 
le message sonore d'erreur sans toutefois 
interrompre le programme. 


Notons cependant quelques différences avec 
les messages classiques. Tout d'abord, comme 
HAIFA tient à se démarquer du DOS, les 
erreurs de ce dernier sont signalées par un 
DOS ERROR. Un  enfoncement de CTRL-C est 
signalé par un BREAK ERROR et enfin une 
erreur dans un INPUT est signalée par un 


INPUT ERROR. 
Détruire un tableau 


& DEL [nom de tableau] détruit ce tableau. 


Le tableau peut être réel, entier ou 
alphanumérique, S'il n'existe pas, on ob- 
tient un OUT OF DATA ERROR. 

Ch ement d'une ligne de programme 


& NEW [expression numérique] , [expression 
chaîne] remplace la ligne dont le numéro est 
l'expression numérique par l'expression 
chaîne. 


instruction est exécutée à partir 
du clavier, on obtient une ILLEGAL DIRECT 
ERROR. S'il n'y a pas de numéro de ligne 
correspondant, on obtient le message UNDEF'D 
STATEMENT ERROR. 


Si cette 


La ligne originale doit être plus longue 
que la chaîne, sous peine de STRING TOO LONG 
ERROR. Il est donc conseillé d'y mettre 


initialement un REM très long. Comme la ligne 
initiale est plus longue que la chaîne, HAIFA 
met à la fin de la chaîne ": REM" afin de 
pouvoir ignorer la fin de la ligne. 


La chaîne ne doit bien sùür pas comprendre 
le numéro de ligne. 


Cette instruction est un outil très 
puissant pour un programme d'initiation au 
BASIC ou pour un programme nécessitant 


d'entrer des formules mathématiques. Il est 
conseillé de l'utiliser avec Ll'ONERR GOTO 
actif. 


ATTENTION aux fonctions et aux expressions 
chaînes définies par une chaîne de caractè- 


res dans la ligne initiale: il ne faut pas 
perdre de vue que les descripteurs de telles 
variables pointent directement vers une 
adresse du programme changer la ligne 
modifie ces variables de manière imprévi- 
sible. 


& NEW NEXT [expression numérique] , [expres- 
sion string] 


Mêmes remarques que pour le & GOTO NEXT. 
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Entrée des commandes moniteur 


& CALL [chaîne] exécute les commandes moni- 
teur que constitue la chaîne. 


A partir du clavier, on obtient ILLEGAL 
DIRECT ERROR. HAIFA ajoute N D9C6G à la 
chaîne pour renvoyer au programme BASIC. Le 
délimiteur N fait que cette routine restitue 
le mode NORMAL. 


Echange de deux variables 


& SWAP ( [nom de variable 1] , [nom de va- 
riable 2] ) échange les descripteurs des deux 
variables. 


instuction est très rapide, car elle 
n'utilise pas comme en BASIC une variable 
intermédiaire. Si les deux variables ne sont 
pas du même type, on obtient un TYPE MISMATCH 
ERROR. Si l'on désire échanger les 
descripteurs de variables de types diffé- 
rents, il faut passer par la pile. 


Le REPEAT PRINT 


Cette 


& REPT PRINT [chaîne] , [expression numé- 
rique] imprime la chaîne autant de fois 
qu'in- diqué par le résultat de l'expression 
numé- rique. 


S'il y a un point-virgule à la fin de 
l'instruction, on n'imprime pas de retour 
chariot. L'expression numérique doit être 


comprise entre D et 255. 
Le PRINT USTNG 


& PRINT USR [chaîne] :; [expression numéri- 
que] , ... , {expression numérique] imprime 
les expressions numériques selon le format 


indiqué par la chaîne. 


S'il y a un point-virgule àä la fin de 
l'instruction, on n'imprime pas de retour 
chariot. 


Caractéristiques du format, l'image selon 
laquelle le nombre résultant de chaque 
expression numérique sera imprimé : 

. Le nombre sera placé dans le champ défini 
par le format, de droite à gauche, avec 
justification à droite. 

. Le premier point à 
indique l'emplacement du 
donc le nombre de décimales 
l'instruction arrondit). 

= Les blancs, Zzéros, dollars ou étoiles 
indiquent les endroits où l'on peut placer 
des chiffres. Tous les autres caractères sont 
non-remplaçables. 

. Les virgules seront imprimées dans le 
nombre, sauf celles à gauche du nombre qui 
seront remplacées par le caractère juste à 
leur droite (qui sera lui aussi imprimé selon 
les présentes règles). 


partir de la droite 
point décimal et 
(notons que 


Si un 
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(ou plusieurs) chiffre du nombre est 


imprimé à la place d'un dollar du format, un 


dollar (unique) sera poussé à gauche par le 
nombre. D'où les possibilités de dollars 
fixes ou flottants (un dollar est fixe 
lorsqu'il n'y à pas de chiffre à sa 
position). Pour avoir des Zéros ou des 
étoiles en tête du nombre, il suffit de 
remplir le champ du format avec ces 


caractères. 


comporter 
Si le 


Le nombre imprimé peut enfin 
jusqu'à neuf chiffres significatifs. 


nombre est trop long (plus de neuf chiffres) 
où si le champ est trop petit (pas assez de 
place pour le remplir avec les chiffres du 
nombre), le champ est entièrement rempli de 
dièses qui indiquent un dépassement de 
capacité. C'est préférable à une simple 
troncature, qui peut induire en erreur. 


Faire une pause 


& WAIT ( [expression numérique] ) permet de 
faire une pause. 


L'expression doit être comprise entre 0 et 
255 : la pause a pour durée la valeur de 
l'expression en dixiémes de seconde. 


& WAIT + ( [expression numérique] ) fait la 
même chose à la différence près que la 
pression d'une touche permet de terminer 


prématurément la pause, 


Notons que le clavier est remis à zéro à la 
fin de la routine. 


PEEKS et POKEs généralisés 


& POKE [expression 1] , [expression 2] per- 
met de "'poker!! sur deux octets, 


Les expressions doivent être comprises 
entre -65535 et 65535. La première représen- 
te bien sùr l'adresse et la deuxième un 


nombre entier de deux octets dont on met 
celui de poids faible dans l'octet de 
l'adresse et celui de poids fort dans l'octet 
suivant. Cette instruction permet par exemple 
de donner en une seule commande l'adresse de 
début de la table de SHAPES par un & POKE 
232, adresse. 


& PEEK programme le JMP de la fonction USR 
vers la routine de PEEK généralisé. 


Il suffit alors de faire USR ( [expression 
numérique] J. L'expression, comprise entre 
-65535 et 65535, cest comme ci-dessus une 


adresse et le résultat de la fonction USR est 
un entier de deux octets signé (donc compris 
entre -32768 et 32767) dont l'octet de poids 
faible cest la valeur de l'octet de l'adresse 
et celui de poids fort de l'octet suivant. 


Le nettoyage de la mémoire 


&  CLEAR permet de vider la mémoire des 
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chaînes de caractères inutilisées à condition 
que la quantité de mémoire vive encore 
disponible soit inférieure à 1 K. 


& CLEAR + permet de le faire dans tous les 
cas. 
Cette opération de nettoyage est la même 


que celle effectuée par l'Applesoft, soit 
forcée par l'utilisateur s'il invoque la 
fonction FRE(O), soit exécutée par le 
programme quand il sent la place mémoire lui 
manquer. Mais, au prix de l'emploi de 8 
octets de stockage, cette routine est beau- 
coup plus rapide que celle de l'Applesoft, 
car au lieu de travailler chaîne de 
caractères par chaîne de caractères, elle en 
traite 16 à la fois, selon le principe 


expliqué dans lom's, numéro 2. 


Le IF THEN ELSE 


& IF [expression] THEN [instructions] : & 
ELSE : [instructions] est l'instruction bien 
connue des utilisateurs de BASIC Microsoft, 


Notons d'abord qu'à la différence du IF de 
l'Applesoft, celui-ci ne tolère pas une 
chaîne car cela ne sert à rien. Remarquons 
bien que le & IF et le & ELSE sont sur la 
même ligne. 


vraie, c'est-à- 
les instruc- 


est 
toutes 


Lorsque l'expression 
dire différente de O, 


tions entre le & IF et le & ELSE sont cffcc- 
tuées et celles après le & ELSE ignorées. 
Lorsqu'elle est fausse, c'cst-àdire 
lorsqu'elle vaut 0, seules les instructions 
après le & ELSE sont effectuées. IMfin, à 
moins d'un renvoi par GOTO, RETURN, & TO 
etc., les instructions de la ligne suivante 


sont effectuées ensuite dans les deux cas. 
Lorsqu'il n'y à pas d'instrutions après le & 
ELSE ou lorsque cette dernière instruction 
n'accompagne pas le & IF, on à l'équivalent 
d'un IF classique. 


Remarquons qu'on ne peut emboîter plusieurs 
IF THEN ELSE car HAIFA recherche le premicr & 
ELSE aprèes le & IF. Mais on peut cependant y 
emboîter des boucles IF dans la limite de la 
capacité de l'interpré- teur, c'est-à-dire 
une ou deux. Signalons aussi qu'un & ELSE qui 
ne suit pas un & IF sur une ligne est 
considéré par HAIFA comme un REM. On a ainsi 
la possibilté d'avoir des REM d'instructions 
BASIC bien mises en placc au listing et qui 
sont, comble de chance, changées par RENUMBER 
quand il s'agit de GOTO ou de COSUB. 


Enfin, THEN a été rendu faculatif par 
HAIFA car il faut bien reconnaître qu'il ne 
sert à rien. Lorsqu'il y a un THEN suivi par 
un numéro de ligne, il signifie encore GOTO. 


le 


Choix à partir d'un menu 


& LET ( [expression 1] , [expression 2] ) - 





[nom de variable] effectue la routine de 
menu. 


La variable doit être entière où réelle: à 


la fin de la routine, elle contiendra le 
numéro de l'item choisi. 

Les expressions, qui sont numériques, 
représentent respectivement le nombre de 
lignes à sauter entre chaque item (par 
exemple, si c'est 1, il y aura un item toutes 


les deux lignes) et le nombre d'items. Le 
premier item est situé sur la première ligne 
de la fenêtre de la page texte et le dernier 
doit se trouver encore dans cette fenêtre, 
sous peine de ILLEGAL QUANTITY ERROR. Les 
items sont numérotés de O0 à la valeur de 
l'expression 2. 


affiche alors une barre en 
le premier item, sur toute la 
la fenêtre texte. En fait, les 

mode NORMAL sont repreésentés 
en INVERSE et vice-versa, alors que les 
caractères FLASII et minuscules restent in- 
changés. L'utilisateur peut alors ‘promener! 
la barre sur les différents items en 
utilisant la flèche à droite pour descendre 
et celle à gauche pour monter. Il y a 
d'ailleurs ‘bouclage' quand on arrive en haut 
où en bas. Appuyer sur ESCAPE permet de 
sortir de cette routine en affectant 0 à la 
variable: aucun item n'a été choisi. Appuyer 
sur RETURN sort également, mais affecte à la 


La routine 
inverse sur 
longueur de 
caractères en 


variable le numéro de l'item choisi (celui 
qui était sous la barre). Pour choisir 
l'item, on peut aussi, si son numéro est 
inférieur ou égal à 9, appuyer sur le chiffre 


correspondant. 


Il est de la responsabilité du programmeur 
d'afficher les noms et éventuellement le 
numéros des items avant de lancer le menu, 
ainsi que d'adapter la fenêtre de la pæge 
texte à ses besoins pour effectuer cette 
routine de menu. Signalons enfin que, quelle 
que soit la manière dont on quitte la routine 
(sauf  RESET bien entendu!), l'écran est rendu 
à son état initial, car appliquer deux fois 
la barre laisse le statu quo. D'autre part, 
cette routine est incompatible avec la sortie 
de caractères sur la page haute résolution 
car clle POKE directement la barre sur la 
page texte. 


& LET ( [expression 1] , [expression 2], 
[expression 3] }) - [nom de variablel fait la 
même chose mais remplace la barre par l'im- 
pression dans la première colonne de la 
fenêtre du caractère dont le code écran 
correspond à l'expression 3 (de 0 a 255). 


Le caractère de l'expression 3 peut par 
exemple être une flèche à droite en FLASH, de 


code écran 126 (voir le manuel de référence 
de l'Apple II pour connaître les codes 
écran). Comme la routine POKE le caractère 


sur la page texte, il y a toujours incompa- 
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tibilité avec la sortie de caractères sur la 


page haute résolution. Notons également que 
l'écran est laissé intact à la fin, la 
routine retenant en mémoire le caractère se 


trouvant là où elle veut mettre le caractère 
de l'expression 3. 


2. LES COMMANDES GRAPHIQUES BASSE RESOLUTION 
Les initialisations 


& GR ( [expression numérique] ) initialise en 
mode mixte. 

& GR + ( lexpression numériquel ) initialise 
en mode non-mixte (avec les quatre lignes du 
bas). 


L'expression numérique identifie la 
couleur, comprise entre 0 et 255; mais seule 
la valeur modulo 16 est prise en considé- 
ration. L'écran est rempli avec cette 
couleur. 


& GR et & GR + font la même chose, mais sans 
remplir l'écran et sans changer la couleur 
utilisée. 


Les shapes 


Le format de la table de shanes est le même 
qu'en haute résolution : la routine d'analyse 
syntaxique est d'ailleurs calquée sur celle 
utilisce en haute résolution. 


1. Index 

( début = S+0 n (0-$FF) }) nombre de shapes 
( S+1 inutilisé 

( S+2 octet bas ) adresse du pre- 


mier octet de la shape 1, 


( S+3 octet haut ) relatif à l'a- 
dresse S 

( Sois 

( S+2n octet bas ) adresse du pre- 
mier octet de la shape n, 

( S+2n+1 octet haut ) relatif à l'a- 
dresse S 


2. Octets des shapes 


( S+D1 ler octet ) 

( CSSS ) shape 1 
( S+D2-1 dernier=0 ) 

( RS 

( 8+Dn ler octet ) 

( cmsessses )'SNADE N 
( dernier=0 ) 

De même qu'en haute résolution, on plotte 


avant d'effectuer le déplacement, lors de la 
description de la shape. Mais, cela mis à 


0 


préféré faire un léger gâchis de place 
mémoire dans la table de shapes, plutôt que 
de rallonger et compliquer la routine. La 


partic haute de l'octet (de 0.à F) indique le 
déplacement: 
Sans plotter En plottant 
701 F89 
62 E# A 
543 D CB 


& DRAW [expression 1] AT [expression 2], 
[expression 3] dessine la shape avec la 
couleur basse résolution en vigueur. 
& XDRAW [expression 1] AT [expression 2], 
[expression 3] dessine la shape avec les 
couleurs indiquees dans la table de shapes. 
Les expressions sont numériques. La pre- 
mière, de O0 àn, représente le numéro de la 
forme (shape). La deuxième, comprise entre 0 
et 39, et la troisième, comprise entre O0 et 
17, représentent le point de départ du tracé 
de la forme. Lorsqu'on dépasse les limites de 
l'écran, les points en question ne sont pas 
plottés. Le point de départ doit toutefois 
être sur l'écran. 


Lorsqu'on est en mode mixte, une forme 
débordant dans la zonc texte y est quand même 
plottée, engendrant ainsi des caractères 
écran divers. Il vaut donc mieux faire un 
HOME dans ce cas. 


Il n'y a pas de shape 0, bien que l'ex- 
pression 1 le tolère, C'est le même bug qu'en 
haute résolution, puisque les routines sont 
semblables. 


3. GENERALITES HAUTE RESOLUTION 
Les initialisations 


& HGR ( [expression numérique] ) initialise 
la page 1 en mode mixte. 

& HGR + ( [expression numérique] ) initiali- 
se la page 1 en mode non-mixte (avec les 
quatre lignes du bas). 

& HGR2 ( [expression numérique] ) initialise 
la page 2 en mode non-mixte. 


Le mode mixte ne sert pas pour la page 2 
car la page 2 de texte n'est généralement pas 
utilisée comme telle. L'expression doit être 
comprise entre 0 et 7. Elle identifie la 
couleur haute résolution qui remplit la page 
considerée. 


part, la description de la shape est diffé- Les initialisations mettent la tortue en 

rente. 0,0 avec une rotation nulle, font ROT = 0 et 

SCALE = 1, initialisent la fenêtre à la 

La partie basse de l'octet (de O0 à F) con- taille de l'écran, mettent le mode égal à 

tient la couleur du point. Elle est 255,0,0, mettent le type égal à 10, mettent 

inutilisée si l'on ne plotte pas. On a la position d'impression de caractères haute 
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résolution en 0,0 et suppriment l'éventuelle 
sortie de caractères haute résolution en 
installant le mode normal d'entrée/sortie de 
caractères au clavier et à l'écran de HAIFA. 


Voir plus bas la signification de ces ex- 
pressions. 

& HGR , & HGR + et & HGR2 font la même cho- 
se, mais sans remplir l'écran ni changer la 


couleur utilisée, 


Le mode de remplissage 


& MODE = [expression 
Cexpression 3] 


1 > 


[expression 2], 


Les expressions sont numériques, de 0 à 
295: Certaines routines haute résolution 
recopient un octet de l'écran à sa place ou à 
un autre endroit. Auparavant, HAIFA fait un 
AND logique entre cet octet et l'expres- sion 
1, un OR entre le résultat et l'ex- pression 
2 puis un EOR avec l'expression 3. Les 
valeurs par défaut du mode sont celles qui 
n'ont aucun effet: 255 pour l'AND, O pour 
l'OR ct O pour l'EOR. Par exemple 127,0,0 met 
à O0 les 8èmes bits de couleur; 255, 128,0 les 


met à 1; ct 255,0, 128 les inverse. Ou encore 
255, 0, 127 inverse la fenêtre haute 
résolution, les 8èmes bits étant inchangés et 
255,0,255 inverse la fenêtre, Bèmes bits 
compris. 


Le type de remplissage 


& TYPE = [expression numérique] 


comprise entre 0 et 255, 
sortie de caractères haute 


L'expression est 
Les routines de 


résolution envoient un octet d'une table sur 
un octet de l'écran après avoir fait une 
opération logique entre ces deux octets. Si 


le type est supérieur ou égal à 128, on met à 
1 Îles Bèmes bits de couleur de 1a table avant 





l'opération; sinon, on les met à 0. Et le 
type  MODULO 16 est alors le même qu'en 
PASCAL: 
Type Effet 

0 0 

1 TNORE 

2 T AND NOT FE 

3 NOT E 

on NOT T AND E 

2 NOT T 

6 TEORE 

7 T NAND E 

8 T AND E 

9 T[(=lE 

10 T 

11 T OR NOT E 

12 E 

13 NOT TORE 

14 TORE 

15 1 


où T désigne un octet de la table et E celui 
de l'écran se trouvant à sa destination, La 


valeur 
simplement 
(10). 


par défaut est celle qui copie 
les octets de la table à l'écran 


Les options haute résolution 


Diverses options peuvent être mises dans 
certaines instructions haute résolution. 
Lorsqu'il y en a plusieurs, elles doivent se 
suivre dans l'ordre correspondant à leur 


présentation ci-dessous. 


L'OPTION PRIME: 
après la commande 


mettre un prime (') juste 

fait que l'on change la 
page graphique principale, sans changer 
toutefois la page affichée. Tout ce qui 
devait sortir sur la page 1 sort sur la page 
2 et vice-versa. Cette option est en quelque 
sorte un POKE 230,96 - PFFK (230) amélioré. 
Elle permet de faire du ‘“ping-pong' en 
écrivant sur la page non visible qui sera 
affichée, une fois mise au point, ce qui 
évite le clignotement. 


L'OPTION POUR-CENT (%) est utilisée dans 
les routines qui se servent du MODE. Les AND, 
OR et EOR sont appliqués aux octets de 1a 
page pricipale (éventuellement modifiée avec 
l'option prime), et le résultat est recopié 
dans l'autre page. 


L'OPTION DIESE (=) est utilisée dans les 
routines qui tracent des lignes ou dans 1a 
routine de sortie de caractères & DRAW PRINT. 
Elle donne l'ordre à HAIFA de ne pas dessiner 
les points qui se trouvent en dehors de la 
fenêtre haute résolution. C'est ce qu'on 
appelle le ‘clipping'. Cela n'empê- che pas 
dans le cas du tracé de lignes d'avoir un 
ILLEGAL QUANTITY ERROR si l'on essaye de 
dessiner hors de l'écran, que la fenêtre 
coîncide ou non avec l'écran, 


La fonction SCRN haute résolution 


sont rangés sur l'écran par 
octets de sept points horizontaux (les sept 
bits les plus bas de l'octet, le bit le moins 
significatif représentant Le point le plus à 
gauche). Le huitième bit de l'octct (de poids 
fort) représente la couleur ): 


Les points 


( noir 1 (couleur 0) 

bit ( jaune (couleur 1) 
=0 ( bleu (couleur 2) 
( blanc 1 (couleur 3) 

( noir 2 (couleur 4) 

bit ( vert (couleur 5) 
=1 ( mauve (couleur 6) 
( blanc 2 (couleur 7) 


Les couleurs indiquées ci-dessus sont celles 
de la carte RVB classique. Pour les 
utilisateurs du ‘chat mauve', regarder le 
mode d'emploi de cette carte, 


bil le 


41 


Lorsqu'un point est allumé, le 


Pom's n° 5 





représentant est à 1. Les points des colonnes 
2n sont bleus ou mauves, ceux des colonnes 
2n+1 jaunes ou verts. Lorsque sur une même 
ligne le point de la colonne ?2n et celui de 
la colonne ?n+1 sont allumés, l'ensemble 
parait blanc, Lorsqu'aucun n'est allumé, 


l'ensemble est noir. 


& SCRN ( [expression 1] , [expression 2] ) - 
[nom de variable] assigne à la variable la 
valeur décrite ci-dessous. 


Les expressions sont numériques et la 
variable doit être réelle ou entière. 


! point d'une colonne 2n ! 
mm — + mm mm + 
1  SCRN létat dulétat dulétat du! 
! {8e bit ! point !voisin ! 


mm mm mme mm + 
! 0: ! 0 ! 0 - 0 ! 
! 1 ! 0 ! 0 ! 1 ! 
1 130 0 ! 1 ! 0 ! 
1 131 ! n ! 1 ! L ! 
! 4 1! 1 L 0 [ 0 l 
! 5 1! 1 ! 0 ! 1 ! 
! 134 ! 1 ! 1 1 0 ! 
f 1735 ! 1 ! 1 ! 1 ! 
+—————— +————— +—————— + + 
ee + 
! point d'une colonne 2n4+1 ! 
+= + += += + 


1  SCRN létat dulétat dulétat du! 
! {8e bit ! point !'voisin ! 


mm ee mm mm + 
! Or 0 ! 0 ! 0 ! 
1 129 ! 0 ! 1 ! 0 ! 
! 2 4 0 ! 0 ! 1 ! 
! 131 © 6 1 1 ! 1 ! 
! 4 1! 1 ! 0 ! [e) ! 
! 433 ! 1 ! 1 4 0 ! 
! 6 ! 1 ! 9 ! 1 ! 
1 135 ! 1 ! 1 ! 1 ! 
tm mm mm + + 
Ainsi le point est allumé si et seulement 


si le résultat de & SCRN est suvérieur à 128. 
Et la partie modulo 128 donne la couleur (de 


» 


0 à 7) visible à cet endroit. 


4. LA FENETRE HAUTE RESOLUTION 


Deux choix s'offraient: soit définir une 
fenêtre haute résolution au point près (de 0 
à 279 horizontalement et de 0 à 191 verti- 
calement), soit utiliser l'équivalent des 
positions de la page texte (de O0 à 39 hori- 
zontalement et de O0 à 23 verticalement) avec 
des positions-types horizontales multiples de 
7 (rappelons qu'un octet horizontal con- 
tient 7 points) et verticales multiples de 8 
(voir pourquoi dans le manuel de référence 
Apple 11). 


La première possibilité offrait l'avanta- 
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ge d'être plus précise et d'éviter certaines 
‘bavures' dues à la bizarre représentation 
des couleurs, mais elle avait l'inconvénient 
d'ignorer pratiquement le 6ème bit de 
couleur, car ce bit concerne sept points à la 
fois. 

moins précise, 


La deuxième possibilité, 


permet au contraire de se servir de ce bit et 
posséde aussi l'avantage de correspondre à 
des routines beaucoup plus courtes et 


beaucoup plus simples à réaliser, C'est donc 
cette solution qui à été retenue. 


Dimensionner la fenêtre 


& DIM = lexpression 11], [expression 4] 
donne la dimension de la fenêtre, 


ss. 


Les quatre expressions sont numériques, 
respectivement la gauche (de 0 à 39), la 
droite (de O0 à 39), le haut (de 0 à 23) et le 
bas (de O0 à 23) de la fenêtre. Les limites 
sont incluses dans la fenêtre. 

On doit avoir la valeur de l'expression 1 
(gauche) inférieure ou égale à celle de 
l'expression 2 (droite) sous peine de ILLEGAL 
QUANTITY ERROR. De même pour les valeurs des 
expressions 3 (haut) et 4 (bas). 


Remplir la fenêtre 


& FILL ( [expression 1], 
1] ) remplit la fenêtre 
L'option prime est permise. 


... ,; [expression 
point par point. 


Les quatre expressions sont numériques, de 
0 à 7: cc sont les couleurs avec les- quelles 
on remplit la fenêtre. On remplit les lignes 
alternativement avec les couleurs 1 et 2, 
puis 3 et 4, Et sur chaque ligne on remplit 
les colonnes 2n et 2n+1 de façon à ce que 
l'on voie la bonne couleur (1 et 2, ou 3 et A 
alternativement). Les couleurs 1 et 2, 3 et 
4, puisqu'utilisées dans un même octet, 
doivent avoir le même bit haut. Si ce n'est 
pas le cas, c'est le bit haut de 2 ou de 4 
qui est pris en considération, Exemples avec 
deux couleurs à et b: & FILL (a,a,b,b) 
remplit en alternant les couleurs ligne par 
ligne; & FILL (a,b,a,b) remplit an alternant 
les couleurs colonne par colonne; & FILL 
(a,b,b,a) remplit en quinquonce,. 


ATTENTION AUX EFFETS DE BORD: comme les 
octets contiennent un nombre impair de points 
et qu'un point visible utilise deux points 
écran (colonnes 2n et 2n+1), 11 peut y avoir 
des effets de bord aux limites gauche ou 
droite de la fenêtre, Pour les éviter, le 
bord gauche de la fenêtre doit être pair et 
le bord droit impair. Ceci ne concerne que la 


carte RVR classique. Il n'y a pas de probleme 
en noir et blanc ou avec ‘le chat mauve'. 
Toutefois, avec cette der- nière carte, un 
remplissage en quinqguonce parait noir et 
blanc. 


Pom's n° 5 


& SQOR ( [expression 11, 
] }) remplit la fenêtre 
L'option prime est permise. 


[expression 4 
par carré. 


carré 


Les quatre expressions sont numériques, de 
O à 7: ce sont les couleurs avec les- quelles 
on remplit la fenêtre. On remplit les lignes 


alternativement avec les couleurs 1 cet 2, 
puis 3 et 4; et les colonnes avec 1 et 3, 
puis 2 et À, A la différence du & FILL, les 
lignes et les colonnes correspondent à la 
page texte. Au lieu de remplir point par 
point, on remplit carré par carré, où les 


carrés sont les carrés élémentaires 7 x 8. 


ATTENTION AUX EFFETS DE BORDS: hormis les 
mêmes effets de bord que le & FILL (voir 


ci-dessus), il y a des effets de bord à 
l'intérieur de la fenêtre entre les carrés 
horizontaux (même avec la carte ‘le chat 
mauve"). Les couples qui les évitent sont, 


hormis ceux indiquant la même couleur au bit 
haut près: (0-4, 1-5, 2-6 et 3-7), 0-1, 0-2, 
JS, 3-1, 3-2, 3-6, 4-1, 4-5, l_6, 7-2, 7-5 
et 7-6. 


Bower et modifier la fenêtre 


& COPY recopie la fenêtre à sa place en uti- 
lisant le mode, Les options prime et pour- 
cent sont permises. 

& SHFT [caractère] décale la fenêtre d'une 
position. 

& CLR [caractère] décale d'une position 
l'intérieur de 1a fenêtre, en la vidant. 

& CRCL [caractère] fait une permutation 
circulaire de l'intérieur de la fenêtre. 


Les options prime et pour-cent sont 
permises et le mode est utilisé pour le 
remplissage. Si le décalage de & SHFT est 


empêché par la présence d'un bord de l'écran, 
on obtient une ILLEGAL QUANTITY ERROR. Le 
caractère indique la direction: " " pour la 
gauche, " " pour la droite, "+" pour le haut, 
"_" pour le bas. lh autre caractère donne 
ILLEGAL QUANTITY ERROR. Lorsque l'option 


pour-cent n'est pas mise, les trous laissés 
par & SHFT ou & CLR sont remplis par la 
couleur haute résolution en usage. 


Comme les octets contiennent un nombre 
impair (7) de points horizontaux, un dépla- 
cement horizontal modifie les couleurs 
(échange de 1 et ?, de 5 et 6). Pour éviter 
cela, il est conseillé de faire deux dépla- 


cements consécutifs. 


Les déplacements verticaux utilisent les 80 
derniers octets du buffer d'entrée pour 
stocker des lignes graphiques: il faut donc 
éviter d'entrer depuis le clavier des lignes 
de plus de 176 caractères comportant des 


fait une translation d'une unité et & CLR 
diminue la taille d'une unité, sauf dans le 
cas d'un & CLR quand la largeur de la fenêtre 
dans la direction considerée vaut 1 (dans ce 


» 


cas elle reste à 1, au lieu de passer à 0). 


5. LA TORTUE HAUTE RESOLUTION 


HAIFA possède comme PASCAL une tortue haute 
résolution: aux coordonnées x et y du point 
courant de l'écran on ajoute la rotation a 
comprise entre O0 et 255 (pseudo—egrés): 


064 


1 


6 
! 

! 
128--#--000 
! 

92 


Fixer la rotation 


& ROT = [expression numérique] fournit la 
valeur de a. 
&  ROT ( [expression numérique] }) ajoute 
l'expression à la valeur de a. 

L'expression doit être comprise entre 


-65535 et 65535 et est traitée modulo 256. 


Tracer des points et des droites 


& ({ HPLOT ) ( [expression 11 , [expres- 
sion 2] ) 
& ( X HPLOT ) ( TO [expression 1] , [ex- 


pression 2] ) 
& ( N HPLOT ) ( ON [expression 3] ) 

Les options prime et dièse sont permises. 

Les expressions sont numériques, les deux 
premières représentant un point de l'écran (x 
de O0 à 279 et y de 0 à 191) et la troisième 
la distance que la tortue doit parcourir dans 
la direction a. On obtient une ILLEGAL 
QUANTITY ERROR si cela doit amener la tortue 
à sortir de l'écran. 


& HPLUT est le HPLOT classique, à La seule 
différence que si l'on change la couleur 
avant un HPLOT TO, le HPLOT TO classique 
continue avec l'ancienne couleur, mais pas le 
& HPLOT TO, 


& X HPLOT fait la même chose, mais en 
couleur inverse, Le bit haut reste inchangé; 
on a donc les échanges de couleurs 0-3, 1-2, 
4-7 et 5-6. ATTENTION! Si faire & X HPLOT 
XYT TO X2:Y2: & X HPLOT %X1,Y1 TO x2,y2 
laisse l'écran inchangé, il n'en est pas de 
même pour & X HPLOT x1,y1 TO x2,y2: & HPLOT 
x2,Y2 TO x1,y1. 


déplacements verticaux, sous peine de SYNTAX & N HPLOT fait la même chose mais sans 
ERROR, laisser de trace sur l'écran (couleur nulle). 
Les instructions & SHFT et & CLR modi- 
fient les dimensions de la fenêtre: (& SHFT Les instructions multiples sont permises 
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avec TO et ON, par exemple: & HPLOT x1,y1 TO 
xX2,Y2 ON x3,y3 ON x4,y4 TO x5,y5. Notons que 
les valeurs par défaut aprés initialisation 
sont: x = y = a = 0. 


6. LES ENTREES SORTIES 


Les entrées/sorties disque 


& FRE , S [chiffrej , D [chiffre] reprogram- 
me la fonction USR pour la routine de sec- 
teurs libres, 


Les commandes S et D, qui indiquent le slot 
et le drive, sont facultatives; leur ordre 
importe peu et il peut même y en avoir 
plusieurs, seule la dernière étant prise en 
compte. Si l'une des deux (ou les deux) n'y 
est pas, la valeur par défaut est celle du 
précédent & FRE s'il y en a eu un, ou 6 pour 
le slot et 1 pour le drive s'il n'y en n'a 
pas eu. 


USR (0) fournit alors le nombre de scc- 
teurs libres dans la disquette correspondant 
au drive et au slot décrits ci-dessus. 


& STORE [nom de tableau] , [chaîne] corres- 
pond à l'instruction STORE pour cassettes. 


& RECALL [nom de tableau] , [chaîne] corres- 
pond à l'instruction RECALL pour cassettes. 


Ces instructions utilisent des fichiers 
binaires sur disque. 

Le tableau doit être numérique; s'il 
n'existe pas, on obtient une OUT OF DATA 
ERROR. La chaîne représente le nom du fichier 
qui stockera le tableau. Ce doit être un nom 
valide sinon le DOS émettra un message 
d'erreur. 


Dans le cas d'un & RECALL, le tableau 
récepteur doit avoir les mêmes dimensions que 
celui qui avait été enregistré sur le 
fichier. Sinon, ei le fichier est trop petit, 
la routine imprime ERK et fait un bip, mais 
n'arrête pas le programme; et s'il est trop 
gros au contraire, il y a des catastrophes 
car le fichier BLOADé déborde du tableau et 
la routine prend l'initiative de faire un 
CLEAR et de donner une OUT OF MEMORY ERROR. 
Notons que si le tableau récepteur a la même 
taille, mais avec des dimensions différentes 
(par exemple le tableau enregistré était 
10x10 et le tableau récepteur est 20x5), il 
n'y a pas d'erreur, mais la situation risque 
de ne pas être très claire. 

Quand ces instructions sont utilisées 
depuis le clavier, d'autres instructions qui 
auraient été mises sur la même ligne ne sont 
pas effectuées car le DOS efface le buffer 
d'entrée et ces routines retournent, quand on 
les appelle du clavier, au niveau général de 
l'Applesoft. 


Ces instructions permettent l'enregistre- 





ment d'un tableau numérique sur disquette 
environ 16 fois plus rapidement qu'avec un 
fichier TEXT. D'autre part, la place 
nécessaire pour stocker le tableau sur disque 
a été réduite de plus de 50%. 


Les entrées/sorties imprimante 


& DUMP TEXT , S [chiffre] imprime la page 
texte sur l'imprimante. 

& DUMP CR , S [chiffre] imprime la page 
graphique basse résolution sur l'imprimante. 


I1 s'agit dans les deux cas de la page 1, 
la page 2 étant rarement utilisée car elle 
correspond au début des programmes Applesoft. 
Le chiffre indique le slot. La commande 8 est 
facultative, la valeur par défaut étant celle 
du précédent  & DUMP (l'un ou l'autre) 
effectué ou 1 s'il n'y en n'a pas eu. Cette 
instruction concerne exclusivement les im- 
primantes à interface parallèle qui consti- 
tuent la majorité des imprimantes bas de 
gamme destinées à l'Apple IL (Centronics, 
Epson, Seikosha, etc.). 


Il est inutile d'avoir branché l'impri- 
mante, le programme lui envoyant directement 
les caractères sans passer par les routines 
d'entrée/sortie du moniteur. 11 est toutefois 
conseillé de l'avoir allumée! 


Pour le & DUMP TEXT, les caractères FLASH 
ou INVERSE ne sont pas distingués par 
l'imprimante car l'instruction les rétablit 
en mode NORMAL avant l'envoi du code à 
l'imprimante. 


Pour le & DUMP GR, si la couleur vaut 0 
(c'est-à-dire le noir), HAIlFA envoie un 
espace à l'imprimante et dans le cas 
contraire (couleur 1 à 15), il envoie le 
chiffre hexadécimal correspondant (1 à 9 puis 
A à F pour 10 à 15). Comme il y a deux fois 
plus de lignes que dans la page texte et que 
les caractères de l'imprimante n'ont q'une 
hauteur possible, il peut être conseillé, 
pour respecter approximativement les 
proportions de la page graphique, d'utiliser 
le mode double largeur de l'imprimante s'il 
existe. Pour cela, il faut ou bien faire un 
PR#I et envoyer à l'imprimante par un PRINT 
le caractère de contrôle du mode double 
largeur ou bien POKEr l'adresse d'entrée/ 
sortie de l'imprimante avec ce caractère ou 
bien encore envoyer à la routine de l'inter- 
face parallèle (celle-la même utilisée par 
HAIFA) ce même caractère de contrôle. 


La musique 


Toutes les routines musicales utilisent 
l'option prime. Si l'on met un prime (') 
juste après le nom de la commande, et avant 
ses arguments, le son sortira sur la sortie 
cassette. Si le prime est absent, il sort sur 
le haut-parleur interne de l'ordinateur. 
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& NOT ( [expression 1] , [expression 2] ) 
fournit la routine classique de musique. 


Les expressions sont numériques, de O à 
255. La première représente la hauteur de la 
note, 255 étant la plus grave. Cette 
expression est inverse de la fréquence en ce 
sens que doubler l'expression descend 1a note 
d'un octave. 

La deuxièeme expression 
nelle à la durée de la note. 


est proportion- 


& POP ( [expression 1] , [expression 2] ) est 


une routine qui peut servir dans les jeux car 
elle donne des bruits de sirènes et de 
phasers. 


Les expressions sont encore numériques de O0 
à 255. La première représente en quelque 
sorte la longueur d'un coup (buzzer pour 
moins de 128 et phaser audelà), et a 
seconde le nombre de coups. Notons que les 
coups ont une longueur qui augmente avec 
l'expression 1, Le mieux est que lecteur 
s'amuse lui-même à voir comment marche la 
routine, 


& PLAY1 joue un air à une voix. 


La table qui contient l'air est formée de 
groupes successifs de 3 octets qui 
représentent les notes. La hauteur de la note 
est représentée par le complément à 51? de la 
some des deux premiers: encore une fois, 
doubler ce complément correspond à descendre 
d'un octave. 


Le rapport de ces deux octets donne le 
timbre: classique si le rapport vaut 1 et de 
plus en plus nasillard au fur et à mesure que 
l'on s'éloigne de la valeur 1, dans un sens 
ou dans un autre. 


Le troisième octet complémenté à 256 est 
proportionnel à la durée de la note, Ainsi, 
si les octets valent 200, 92 et 220, on a un 
LA (292) avec un timbre 2 et c'est une croche 
(36=256-220). Ces notes peuvent être prises 
pour référence, les autres se calculant 
d'après celles-là en connaissant les 
fréquences et les durées relatives. 


DO RE MI FA 
1 9/83 5/4 4/3 


SOL LA SI DO 
3/2 5/3 15/8 2 


Si le premier octct vaut 0, le programme 
effectue une pause dont la longueur 
correspond au troisième octet. La nullité du 


troisième octet quant à elle indique La fin 
de l'air joué. Notons que l'utilisateur peut 
à tout moment interrompre la musique en 
appuyant eur une touche. 


& PLAY2 joue un air à deux voix. 


—_—_—_——— ————————————————— 


diffusée par POM's pour des raisons de 
copyright. Il s'agit encore de la lecture 
d'une table de groupes de 3 octets dont les 


deux premiers représentent les hauteurs des 
voix et le troisième la durée commune. Pour 
plus de détails, voir le mode d'emploi de 
ELECTRIC DUET. Cette routine peut être 


incorporée à HAIFA par tout possesseur de 
ELECTRIC DUET. 


& PLAY1 ( [expression numérique] ) et 


& PLAY2 ( [expression numérique] ) font la 
même chose que précédemment mais en 
commençant par la note dont le rang 


correspond à l'expression numérique. 


Les entrées/sorties de caractères 


HAIFA a reprogrammé les entrées/sorties de 
caractères à l'écran pour deux raisons: 
utiliser des caractères de contrôle pour 
faire certaines opérations et avoir faci- 
lement les minusoules au clavier et à la 
sortie écran. appelons cependant que les 
minuscules n'apparaissent comme telles à 
l'écran que pour les possesseurs d'une carte 
ou d'une ROM spéciale (voir le manuel de 
référence Apple II pour l'aspect des minus- 
cules sans carte spéciale). 


mode d'entrée/sortie, il 
suffit de faire un PR= pour la sortie de 
caractères et un IN= pour l'entrée. Par 
exemple PR=0O et IN=0 redonnent le contrôle 
des  entrées/sorties aux routines moniteur 
classiques (COUTI pour la sortie et KEYIN 
pour l'entrée). On peut aussi, depuis le 
clavier, appuyer sur la touche RESET. Rappe- 
lons toutefois que HAIFA est essentiellement 
destiné à être utilisé à partir d'un 
programme . 


Pour quitter un 


Ces modes d'entrées/sorties sont repérés 
facilement par l'utilisateur car le curseur 
ne clignote plus et donc représente les 
caractères en INVERSE au lieu de les repré- 
senter en FLASH. Cela permet d'établir une 


similitude entre les centrécs/sorties sur la 
page texte et sur la page graphique haute 
résolution; car dans ce dernier cas il n'est 
pas possible de générer un curseur cligno- 
tant sans ralentir considérablement la vi- 
tesse des routines d'entrées/sorties, puis- 


réaliser ce clignotement par 
HARD comme pour la page 


qu'il faudrait 
SOFT et non par 
texte. 


Dans tout ce qui suit, on désigne par 
caractère de contrôle tout caractère dont le 
code ASCII est compris entre O0 et 32, on 
parlera de lettre majuscule pour un caractère 
de code se situant entre 6H et 95 et de 
lettre minuscule entre 96 et 127. 


Il s'agit là de la version diffusée de la Nous utiliserons aussi les notations 
routine du programme ELECTRIC DUET qui n'a pu suivantes pour les caractères suivants: 
être introduite dans la version de HAIFA crochet ouvrant = ASCII 91, backslash = 92, 
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TS 








95 et 


underscore = 


crochet fermant = 93, 


SHIFT-P = 64. 


Voyons un peu l'utilisation du clavier 
faite par HAIFA: 
1234567890 : - RESET 


ESC Q WE KR T Y U I O P REPT RETURN 

CTRLASDFGHJKL ; -- -- 

SHIFT ZXCVBNM, . / SHIFT 
BARRE D'ESPACEMENT 


Les entrées 


Elles font une utilisation intensive des 
caractères de contrôle. Les caractères de 
contrôle suivants sont ignorés par la routine 
d'entrée en ce sens qu'elle reboucle sur 
elle-même si elle les rencontre et qu'elle ne 
les rentre pas dans le buffer d'entrée: 
CTRL-%, CTRL-crochet fermant et CTRL-SHIFT-P., 
Notons que CTRL-backslash et CTRL-underscore 
sont inaccessibles au clavier. 


Les caractères de contrôle suivants sont 
considérés commes des caractères normaux par 
la routine d'entrée: CTRL-C qui permet 


d'interrompre un INPUT ou un & INPUT, CTRL-D 
invoque le DOS lorsqu'il est employé dans 


qui 
une instruction PRINT, CTRL-G qui émet un bip 
quand il est envoyé à une routine de sortie, 


CTRL-H qui est la flèche à gauche, CTRL-J qui 
fait un saut de ligne lorsqu'il est envoyé à 
la routine de sortie de caractères, CTRL-M 
qui est la touche RETURN, CTRL-U qui est la 
flèche à droite, CTRL-X qui permet d'annuler 
l'entrée dans les routines d'entrée d'une 
ligne de caractères. 


Les caractères de contrôle suivants 
effectuent une action particulière mais sont 
ensuite ignorés par la routine d'entrée qui 
reboucle sur elle-même et ne les rentre pas 
dans le buffer d'entrée: 

CTRL-A déplace le curseur à gauche comme 
ESC B, CTRL-S le déplace à droite comme ESC 
A, CTRL-W le déplace vers le haut comme ESC D 
et CTRL-Z vers le bas comme ESC C. 

CTRL-P efface l'écran comme ESC SHIFT-P, 
CTRL-E efface jusqu'à la fin de la ligne 
comme ESC E et CTRL-F efface jusqu'au bas de 
l'écran comme ESC F. Notons que dans le cas 
d'une sortie sur l'écran haute résolution, 
ces caractères agissent de la même facon. 

CTRL-R met en place le mode majuscule (qui 
est mis par défaut au lancement des routines 
d'entrées/sorties), CTRL-V met en place le 
mode minuscule et ESC fait que la prochaine 
lettre tapée sera majuscule, les suivantes 
restant minuscules (et donc les fonctions 
classiques de ESC sont déconnectées). 


Les caractères suivants reprogramment la 
flèche à droite: CTRL-N fait qu'elle relira 
les lettres telles qu'elles sont (c'est le 
mode mis par défaut), CTRL-T fait qu'elle les 
relira comme étant des majuscules, CTRL-B 
fait qu'elle les relira comme étant des 


minuscules et CTRL-Y fait qu'elle relira les 
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ma juscules comme étant des minuscules et 
vice-versa. 

Notons au passage que les commandes 
Applesoft et DOS doivent obligatoirement être 


rentrées en majuscules, sous peine de SYNTAX 
ERROR. 


Enfin CTRL-Q fait que toute touche enfoncée 
émettra une courte note de musique d'autant 
plus grave que son code ASCII est élevé. 


Réappuyer CTRL-Q refera silence (mode par 
défaut). 
Les caractères suivants permettent d'entrer 


des caractères inaccessibles au clavier; les 
caractères de contrôle sont alors transformés 
en ces caractères par la routine d'entrée: 
CTRL-K fournit le crochet ouvrant (ASCII 91 


en majuscule et 123 en minuscule), CTRL-L 
fournit le backslash (ASCII 92 et 121) et 
CTRL-0O fournit le underscore (ASCII 95 et 


127). 


CTRL-I permet d'insérer un caractère dans 

buffer d'entrée, n'importe quel caractère 
qu'il soit accessible au clavier. A 
fin, curseur disparait jusqu'à ce 
que l'on ait enfoncé une touche, touche qui 
ne sera d'ailleurs envoyée ni à la routine 
d'entrée ni à celle de sortie: cela permet 
par exemple d'insérer dans des chaînes de 
caractères ou dans des REM des carriage 
return, des flèches à gauche, les caractères 
spéciaux des routines entrées/sorties de 
HATFA, etc. 


le 
pour vu 


cette le 


Terminons par quelques remarques à propos 
des maniéres de rentrer des caractères: il y 
à d'abord l'entrée de lignes par la routine 
moniteur GETLN (utilisée par le niveau 
général du moniteur et de l'Applesoft ainsi 
que par les instructions INPUT et & INPUT) 
qui appellent à chaque fois la routine 
moniteur RDKEY, qui appelle alors à son tour 
la routine d'entrée de HAIFA ou autre; et il 
y a aussi les instructions GET et & GET qui 
se contentent d'un appel de RDKEY. Il faut 
donc bien voir que ces deux dernières 
instructions attendent un caractère qui 
“passe à travers" ]la routine d'entrée de 
HAIFA lorsque celle-ci est utilisée. En 
particulier, le CTRL-T n'est dans ce cas 
d'aucune utilité et la touche qu'il demande 
d'enfoncer ne sera pas prise en consi- 
dération. 


Les sorties 


Elles font aussi une utilisation intensive 
des caractères de contrôle. 


Les caractères de contrôle suivants sont 
ignorés par la routine de sortie de HAIFA qui 
les envoie tels quels à la sortie écran du 
moniteur: CTRL-D qui invoque le DOS, CTRL-G 
qui émet un bip et CTRL-à, CTRL-C, CTRL-I, 
CTRL-K, CTRL-L, CTRL-0, CTRL-Q, CTRL-U, 
CTRL-X, CTRL-crochet ouvrant (ESC), CTRL- 






backslash, CTRL-crochet fermant, CTRL-%, 
CTRL-underscore qui sont ignorés par le 
moniteur, 


de contrôle suivants sont 
les routines de sortie mais 
signification que dans la 
routine COUTI (la reprogrammation permet 
d'avoir le même effet dans le cas d'une 
sortie sur la page haute résolution): CTRL-H 
qui fournit un backspace, CTRL-J qui furnit 
un line feed et CTRL-M (RETURN) qui fournit 
un carriage return. 


Les caractères 
reprogrammés par 
gardent la même 


caractères suivants sont reprogrammés 

routine de sortie pour effectuer des 
actions particulières et sont ensuite envo- 
yés à la routine de sortie du moniteur qui 
les ignore: 

CTRL-A déplace le curseur à gauche comme 
CTRL-H, CTRL-S le déplace à droite du 
moniteur, CTRL-W le déplace vers le haut et 
CTRL-Z le déplace vers le bas comme CTRL-J. 

CTRL-P efface l'écran comme HOME ou comme 
CALL — 936, CTRL-E efface jusqu'à la fin de 
la ligne comme CALL = 868 et CTRL-F efface 
jusqu'au bas de l'écran comme CALL - 958, 
Notons que dans le cas d'une sortie sur 
l'écran haute résolution ces caractères 
agissent de la même façon. 


Les 
par la 


Les caractères suivants déterminent le mode 
de sortie des lettres: CTRL-N fait que toutes 
les lettres seront affichées telles qu'elles 
sont (mode par défaut), CTRL-R fait qu'elles 
seront toutes affichées comme minuscules, 
CTRL-B fait qu'elles le seront en minuscules 
et CTRL-Y fait que les majuscules seront 
affichées minuscules et vice-versa, 


ATTENTION! Il convient de faire attention à 
la différence entre les minuscules à l'entrée 
et à la sortie car dans une entrée de ligne 
tout caractère entré est immédia- tement 
envoyé à la sortie. Donc si par exem- ple le 
mode CTRL-B de la sortie est mis, toutes les 
lettres entrées seront imprimées en 
minuscule, mais ce ne sont pas néces- 
sairement des minuscules du point de vue du 
buffer d'entrée. 


& NORMAL PRINT fournit le mode normal d'en- 
trée/sortie de caractères. 


Ce mode est mis en place dès l'installa- 
tion de HALFA, ainsi que par les commandes 
d'initialisation graphique haute résolution 
ou par & INIT. 


Les routines d'entrées/sorties correspon- 
dent alors exactement à ce qui est décrit 
ci-dessus avec écriture sur la page texte. 
Mais en ce qui concerne l'arrêt du listing 
(dans tout ce qui suit, on entend par listing 
le défilement des caractères à l'écran), 
CTRL-S ne marche plus, mais ESC est utilisé à 
la place, ce qui est plus commode, Et CTRL-C 
continue de stopper le listing. 





& HGR PRINT fournit le mode graphique d'en- 
trée/sortie de caractères. 
L'option prime est la seule permise. 


Tout ce qui a été décrit ci-dessus à propos 
des routines d'entrées/sorties reste encore 
valable, mais la sortie a lieu sur la page 
graphique haute résolution choisie avec écho 
sur la page texte pour permettre la relecture 
avec la flèche à droite. Il faut cependant se 
méfier de cette flèche à droite, car toute 
modification de l'écran texte (par un HOME, 
un CALL = 868, un CALL - 958, etc.) ou de la 
page graphique ( par un & SHFT, un & CLR, 
etc.) fait que le caractère relu par cette 
flèche ne correspondra plus nécessairement à 
celui affiché sur la page graphique. 


Notons donc que tous les caractères impri- 
més le sont de même sur la page texte, mais 
que les modes NORMAL, INVERSE et FLASH ne 
sont valables que pour cet écran texte, les 


caractères 
lisant le 
l'instruction 


affichés à l'écran graphique uti- 
type décrit plus haut. D'ailleurs 
& HGR PRINT remet en mode 
NORMAL et il est déconseillé de faire FLASH 
ou INVERSE tant que la sortie haute 
résolution a lieu. 


Notons enfin que les commandes d'efface- 
ment (CTRL-E, F et P, et RETURN au clavier) 
remplissent les lignes qui sont effacées 
normalement sur la page texte avec la cou- 
leur haute résolution utilisée. 


Parlons maintenant des caractères utilisés 
en haute résolution: on utilise une table de 
768 ($300) octets, c'est-à-dire que l'on code 
chaque caractère dont le code ASCII est 
compris entre 32 et 127 par 8 octets (les 
caractères de contrôle ne sont pas codés car 
ils ne sont pas plus envoyés à l'écran 
graphique qu'à l'écran texte). Chaque octet 
représente le caractère par tranches ho- 
rizontales de 7 bits, le Bème bit jouant un 
rôle particulier. Voir l'instruction & YYPE = 
pour savoir comment ces bits sont envoyés sur 
la page graphique. 


Montrons simplement à titre d'exemple 
comment peut être codée la lettre B: 


octet 1 00011111 00011111 
octet ? 00100010 00100010 
octet 3 00100010 00100010 
octet À 00011110 00011110 
octet 5 00100010 00190010 
octet 6 00190010 00100010 
octet 7 00011111 00011111 
octet 8 00000000 00000000 
Notons que la lettre est à l'envers car 
pour la page haute résolution, le bit de 
poids faible correspond au point le plus à 
gauche. Et l'on a mis ici le 8ème bit égal à 


0. 
L'interêt de cette sortie sur la page gra- 


47 


Pom's n° 5 


EEE 


phique est de pouvoir générer ses propres 
caractères, latins, grecs, italiques, cyril- 
liques, gothiques, etc. Et l'on comprend 


qu'en remplaçant les lettres par des morceaux 
de dessins l'on puisse arriver à faire des 
dessins uniquement avec des ordres PRINT, ce 
qui peut se révéler plus agréable que les 
shapes. L'instruction & DRAW PRINT ci-dessous 
est cependant plus commode pour de tels 
dessins que & HGR PRINT qui fait des 
Mcarriage return" en bout de ligne et un 
scrolling en bas de page. 

Remarquons que les fichiers de caractères 
utilisés par HAIFA sont totalement compati- 


bles avec ceux de certains utilitaires du 
commerce, Applesoft ToolKit en particulier. 
Donc, pour avoir des caractères un peu 
particuliers, il suffit de donner à HAIFA les 


fichiers de caractères de Applesoft ToolKit. 


& PDL LIST ( 
modifie pas la 
caractères mais 
ting. 
L'expression, 


[expression numérique] ) ne 
routine d'entrée/sortie de 
change le contrôle du lis- 

indi- 


comprise entre 0 et 3, 


que le numéro de la poignée de jeu (paddle) 
utilisée. La valeur de la poignée fournit la 
vitesse de défilement des caractères à 
l'écran, de O0 (très lent) à 255 (vitesse 
normale). Appuyer sur le bouton stoppe le 
listing, et lâcher le bouton le relance. 
N'oublions pas que le bouton 3 n'existe pas 
sur la prise d'entrée/sortie des manettes de 


jeu et donc si l'expression vaut 3, seule le 
potentiomètre de la poignée fonctionne. 
CTRL-C continue de stopper le listing. 


& STOP LIST ne change pas la routine d'en- 
trées/sorties de caractères mais change le 
contrôle du listing. 


Appuyer sur SHTFT-P stoppe l'envoi des 
caractères à l'écran, mais ils continuent de 
défiler de facon interne dans l'Apple IT. 


sur une touche fait que le listing 
s'arrêtera quand il rencontrera le caractère 
correspondant à la touche (aussi bien en mode 
FLASH ou INVERSE que’ NORMAL). En fait, pour 
permettre cela, la routine arrête le listing 
sur tout caractère dont les six bits les plus 
faibles du code écran correspondent à ceux de 
la touche enfoncée. Ainsi taper sur RETURN 
arrêtera aussi bien le listing sur les M que 
sur les "carriage return", mais taper une 
lettre ne peut faire arrêter le listing sur 
la minuscule correspondante (mais le peut sur 
le caractère qui y correspond, ! pour a, " 
pour b ,etc.)., Le manuel de référence Apple 
II fournit la liste des codes écran. 


Appuyer 


Appuyer alors sur une autre touche relance 
le listing de la même façon. Seule la touche 
ESC permet de le relancer définitivement sans 
arrét. De plus cette touche permet à tout 
moment d'arrêter le listing. 
très utile 


Cette être 
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routine peut par 


exemple pour examiner des listings 
désassemblés ligne par ligne: il suffit alors 
d'appuyer sur RETURN à chaque ligne. De même, 


pour lire un texte mot à mot, 11 suffit 
d'appuyer sur la barre d'espacement à chaque 
mot. Afin cette routine est très utile pour 
compter le nombre d'occurrences d'un 


caractère dans un programme. 
Et CTRL-C stoppe encore le listing. 


Notons que ces deux dernières instructions 
ne détruisent pas les routines d'entrée/ 
sortie en vigueur, en prenant le contrôle des 
entrées/sorties avant le DOS à chaque 
caractère entré ou sorti, de façon à empêcher 
le DOS de reprendre en main les choses. Nous 
pouvons alors faire trois remarques: il est 
possible d'employer simultanément ces deux 
routines er plus de celles des 
entrées/sorties, mais il se pose peut-être un 
problème de stockage des registres internes 
du microprocesseur; il est aussi fortement 
conseillé de ne pas appeler deux fois de 
suite une de ces routines, car cela amène le 
système à "planter", la routine n'arrêtant 
pas de boucler sur elle-même; enfin, il faut 
signaler que les ordres DOS et certaines 
commandes Applesoft comme RUN déconnectent 
l'une ou l'autre de ces routines, mais pas 
les routines d'entrée/ sortie. 


& DRAW PRINT fournit le mode graphique de 


caractères. 


dessins par entrée/sortie de 
L'option prime et l'option dièse sont per- 
mises. 

Cette routine court-circuite la sortie de 
caractères et il faut donc absolument éviter 
de se retrouver au clavier dans ce cas (soit 


enfoncement de CTRL-C, soit à cause d'une 
programme) car le système 
seul moyen de l'arréter est 
d'appuyer sur RESET, On peut aussi prévenir 
plutôt que guérir en faisant & DRAW PRINT: 
PRINT CHR$(A)"PR#0", mais cela peut être 
dangereux (si le curseur se trouve en dehors 
de l'écran, on ne voit plus rien!) et il vaut 
mieux tout simplement mettre 1l'ONERR GOTO 
avec déconnection de & DRAW PRINT si une 
erreur vient à être rencontrée. 


par 
erreur dans le 
plante! et le 


Ensuite en ce qui concerne la sortie de 
caractères, on n'utilise plus le curseur et 
la fenêtre de la page texte, mais un curseur 
spécial remis en haut à gauche par les 
initialisations haute résolution et par 
l'ordre & DRAW PHINT, IL n'y a donc pas 
d'écho des caractères sur la page texte. Ce 
curseur à la particularité de ne pas aller à 


la ligne cet de ne pas faire de scrolling. Et 
quand il dépasse les limites de la fenêtre 
haute résolution (avec l'option dièse) ou de 
l'écran, on ne voit plus les caractères 


imprimés mais le curseur continue d'avancer 
horizontalement fictivement. 


Les seuls caractères de contrôle tolérés 
sont ceux qui déplacent le curseur (CTRL-A, 
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CTRL-S, CTRL-W et CTRL-Z). Notons qu'ils 
agissent bien entendu même lorsque le curseur 
se trouve en dehors de la fenêtre. Les autres 
Caractères de contrôle sont ignorés par la 
routine de sortie. 


Notons au passage qu'à la différence de & 


HGR PRINT, cette instruction ne rétablit pas 
le mode normal et donc qu'il peut être 
conseillé de le faire si l'on se trouve en 


Le mode INVERSE n'est pas gênant 
car il ne consiste qu'à mettre à O0 le Bème 
bit du code ASCII, ce dont la routine de 
sortie de & DRAW PRINT se moque, mais le mode 
FLASH donne des résultats absurdes. 


mode FLASH. 


T1 n'y pas de moyen d'arrêter le listing. 
Seul CTRL-C le stoppe, mais "plante" le 
système (voir ci-dessus). 


De toute façon, cette instruction est des- 
tinée à faire des dessins en remplaçant les 
lettres dans les fichiers de caractères hau- 
te résolution par des morceaux de dessins, 
qu'on assemble en des gros dessins, en 
introduisant des CTRL-A, S, W et Z. Cela 
permet de faire des dessins de taille im- 
portante beaucoup plus facilement qu'en 
utilisant des shapes. 11 suffit dans ce cas 
de faire un & POS (voir ci-dessous) et un 
ordre PRINT pour afficher le dessin. 


& POS = ( [expression 1] ) , ( [expression 2] 
) place le curseur haute résolution. 


Les expressions sont numériques, la 
première étant comprise entre 1 et 40 
(position horizontale) et la deuxième entre 1 
et 24 (position verticale). 


CONCLUSION 


HAIFA est un programme certes intéressant, 
mais qui peut être amélioré et complété. On 


peut songer à introduire de nouvelles 
posibilités, comme le calcul avec des grands 
entiers (comme en PASCAL), des routines de 
tris, d'autres instructions graphiques, etc. 
Le tout étant d'avoir le temps: la version 
actuelle de HAIFA est le résultat d'un 
travail d'avril à juillet 82, et quelques 
mois de plus pourraient permettre de 
l'améliorer. 


Une chose qui serait intéressante serait de 
pouvoir avoir les commandes de HAIFA à la 
carte de façon à ne pas utiliser trop de 
mémoire en ne retenant de HAIFA que ce qui 
sert dans un programme donné. 


La rédaction de Pom's attend à ce sujet les 
suggestions et les propositions des lecteurs. 
Nous aimerions aussi que vous nous signaliez 


ANNEXE 1: LES MEMOIRES UTILISÉES PAR HAIFA 
L'occupation de la mémoire centrale 


A. Version carte langage et Applesoft en ROM: 


Partie 48 K 
$0800 début du programme Applesoft 


$8000 HIMEM et début de HAIFA 

$9000 début de la table de shapes en haute 
résolution 

$9500 début de la table de shapes en basse 
résolution 

$9600 début du DOS 

Carte langage: bank 1 

$D000 début des tables de caractères HIRES 
(5 tables permises) 

$DF0O buffer pour la routine & FRE 

Carte langage: bank 2 

$D000 début de la table des notes de musi- 
que 

Carte langage: partie commune 


$E000 début de HAIFA 
$F000 fin de HAIFA 
$F300 début de la pile (256 variables stoc- 
kables) 

Carte langage et ROM AUTOSTART: 
$F800 moniteur 

On voit que HAIFA utilise pleinement la 
capacité de l'Apple IL muni de la carte 
langage: il y a à peine un peu plus de $300 
octets libres avant $rF300, d'autres octets 
pouvant être libérés par les diverses tables 
de HAIFA. 


Mais nous avons aussi assemblé une version 
pour 8 Kde HAIFA afin que tous puissent en 
profiter. Pour utiliser cette version, il 
suffit d'avoir 18 K et l'Applesoft en ROM ou 
l'INTEGER en ROM et l'Applesoft sur la carte 
langage. 


B. Version 148 K: 


$0800 début du programme Applesoft 

$6800 HIMEM et début de HALFA - 1ère partie 

$7700 début de la table de shapes en basse 
résolution 

$7800 début de HAIFA - 2ème partie 

$8600 début de la table des notes de musique 

$8C00 début de la table de shapes en haute 
résolution 

$9000 début de la table de caractères HIRES 
(1 seule) 

$9300 début du buffer de la routine & FRE 

$9400 début de la pile (102 variables stoc- 
kables) 

$9600 début du DOS 


tous les bugs rencontrés en utilisant HAIFA Pour l'occupation du reste de la mémoire 
car il en reste sürement. (pages graphiques, entrées/sorties, DOS, 
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ete.) voir les différents manuels de l'Apple 
IL. 

On en déduit done que HAIFA est compatible 
avec certains utilitaires d'édition de 
programmes. Par exemple avec PLE (qui met la 
HIMEM en $9000) à condition de ne pas se 


servir de la partie de HATFA comprise entre 


$9000 et $9500 - ou de transférer cette 
partie ailleurs (tables de shapes pour la 
version carte langage, caractères haute 
résolution, buffer de & FRE et pile pour la 


version 48 K). 


HAIFA 
Applesoft 


est compatible avec le APA de 
ToolKit, à condition de charger 
celui-ci juste sous la HIMEM mise par HAIFA. 
En effet, APA est relogeahle, car il utilise 
un "“relocating loader".,. Notons toutefois que, 
dans ce cas, la HIMEM se retrouve environ en 
$7200 pour la version carte langage et $5A00 
pour la version 8 K. La page graphique ? est 
donc inutilisable dans ce dernier cas. 


Les mémoires page zéro 
HAIFA 


mémoires 
19, 1E 


utilise pratiquement toutes les 
page zéro disponibles ($6 à 9, 18 et 
et 1F, EB à EF et FA à FF). Ces 
mémoires ne sont utilisées qu'à titre 
provisoire par HAIFA. Autrement dit n'importe 
quel utilisateur de HATFA peut se servir des 
mémoires page zéro non utilisées par 
l'Applesoft ou le moniteur à condition qu'il 
ne fasse pas exécuter, quand il stocke des 
renseignements dans ces mémoires, des 
instructions HAIFA ou des entrées/sorties de 
caractères de HATFA. 


Les mémoires page 3 


C'est dans la page 3 que HAIFA stocke les 
paramètres dont il a besoin. Les mémoires 
suivantes ne pourront donc pas être utilisées 
dans un programme qui se sert de HAIFA. Si 
l'on a absolument besoin de la page 3, on 
peut assembler HAIFA en mettant ses mémoires 
de stockage ailleurs. 


$300 (768) STACK 

$301 (769) pointeur du sommet de la 
pile (pointe le début de la pile après 
l'initialisation) 


$302 (770) STKLNG longueur de la pile 
$303 (771) STKPTR pointeur de la pile 
$304 (772) LRSHAPE 

$305 (113) ------- adresse du début de la 


table de shapes LORES 

(774) ASCII 

(775) adresse du début de la 
table de caractères HLRES (adresse de 
la première de ces tables après l'ini- 
tialisation) 

(776) MUSIC 

(777) ----- adresse de début de la 
table des notes de musique 

(783) PADDLE numéro de la poignée de 
jeu utilisée par & PDL PRINT 

(784) MODAND premier argument du MODE 


$306 
$307 


$308 
$309 


$30F 
$310 


50 


$311 (785) MODOR second argument du MODE 

$312 (786) MODEOR 3ème argument du MODE 

$313 (787) LFT limite gauche de la fenêè- 
tre 

$314 (788) RGT limite droite de la fenê- 
tre 

$315 (789) TOP limite supérieure de la 
fenêtre 

$316 (790) RTM limite inférieure de la 
fenètre 

$317 (791) TRTLROT angle de 1a tortue 

$318 (792) TYPE ty pe 

$319 (793) HRCH position horizontale pour 
& DRAW PRINT 

$31A (794) HRCV position verticale pour 


& DRAW PRINT 


$31R (795) PRPAG vaut 0 ou 128 


(128 si l'option prime est mise pour & HGR 
PRINT ou & DRAW PRINT, O0 si elle ne l'est 
pas) 


$31C (796) PRWND vaut 0 ou 128 

(128 si l'option dièse est mise pour & DRAW 

PRINT, O0 si elle ne l'est pas) 

$31D (397) PROUT vaut O ou 128 

(9 si la sortie de caractères est celle de & 

NORMAL PRINT et 128 pour & HGR PRINT) 

$31E (398) MINFLAG drapeau majuscules/minus- 
cules pour la sortie 


(est utilisé par & HGR PRINT et. & NORMAL. 
PRINT: O normal, 1 inverse minuscules et 
majuscules, 2 force en minuscules et 3 force 


en majuscules) 

$31F (399) CAPIT drapeau majuscules /minus- 
cules pour l'entrée 

(pour & HGR PRINT et & NORMAL PRINT; O 

ma juscules, 32 minuscules et 128 si ESC vient 

d'être enfoncé) 

5320 (400) CHRSTRE stocke le caractère à 
l'entrée 


(pour & HGR PRINT et & NORMAL PRINT; est 
utilisé pour tromper la routine GETLN qui 
force le mode minuscule quand on rentre une 
ligne) 


$321 (401) RGTARW drapeau majuscules/minus- 
cules pour la flèche à droite (pour la 
relecture en entrée, cf. MINFLAG) 

$322 (402) MUSFLAG drapeau pour CTRL-Q dans 
la routine d'entrée, 


Bien entendu, l'utilisateur de HAIFA est 
libre de POKEr lui-même ces mémoires comme il 
l'entend. C'est surtout utile quand on veut 
changer les adresses des tables utilisées. 
ANNEXE 2 : LES FICHIERS FOURNIS SUR LES DIS- 
QUETTES 


HATFA.TXT & RAMCARD.TXT sont les deux fi- 
chiers sources qui constituent HAIFA, Ils 
sont écrits pour l'assembleur LISA 2,5 et 
sont donc malheureusement incompatibles avec 
les autres assembleurs, car on ne peut les 
BLOADer. Il y a assez peu de modifications à 
faire pour avoir les fichiers 8 K (HAIFA.TXT 
1 et HAIFA.TXT 2): changer les ORG, ICL, DCM 
et les valeurs initiales des mémoires de la 
page 3; il faut aussi supprimer les BIT avec 
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les adresses de lecture et écriture de la 
carte langage (cela n'est pas nécessaire si 
l'on a l'Applesoft en ROM, mais c'est 


indispensable si l'on a l'INTEGER en ROM et 
l'Applesoft sur la carte langage). 


Faute de place, les fichiers HAIFA.TXT et 
RAMCARD, TXT ne sont pas fournis sur la 
disquette d'accompagnement de Pom's, qui est 
déjà pleine, mais sur une disquette spéciale 
contenant ceux-ci dans les versions 64K et 
L8K (plus de 150 secteurs par version ...). À 
propos de ces fichiers sources, notons qu'ils 
ne sont pas faciles à éplucher: ils sont en 
effet si gros qu'il a fallu retirer les 
commentaires (les seuls qui restent sont les 
titres des routines), et d'autre part, comme 
ils ont saturé la table des étiquettes de 
l'assembleur, les adresses des routines 
Applesoft et moniteur sont données la plupart 
du temps en hexadécimal plutôt qu'avec une 
étiquette. 


Notons aussi que la version 48 K n'est pas 
du tout optimisée au point de vue de la place 
en mémoire car ce n'est que la transposition 
de la version 64 K, pour laquelle l'assem- 


blage de routines sur la carte langage n'a 
pour but, aux dépens de la place totale uti- 
lisée, que de réduire la place prise dans la 
partie 48 K. La disquette HAIFA SOURCE est 
vendue en supplément au prix habituel de 50 
francs TIC. 


HAIFA.CODE et RAMCARD.CODE sont les 


fichiers obtenus dans la version pour carte 
langage. Attention au fait que le code objet 
de chacun d'eux a été généré à partir de 
l'adresse $800: il faut donc faire un BLOAD 
,A$8000 pour le premier et , A$E000 pour le 
second. 


HAIFA.CODE 1 et HAIFA.CODE 2 sont les 


fichiers codes de 1a version 48 K. On peut 
faire la même remarque que précédemment: 
,A$6800 pour le premier et ,A$7800 pour Île 
second. 

MAKE HAIFA.EXEC est un utilitaire qui 
permet. de créer un fichier EXEC rommé 
HAIFA,.EXEC qui contient des lignes de 


programmes destinées au chargement de HAIFA 


et de ses fichiers: ce programme demande 
quels sont les fichiers à charger parmi les 
tables de shapes, caractères et de musique, 
avec les adresses de début si ce ne sont pas 
celles par défaut; il demande alors le numéro 
de la ligne de départ pour les instructions 


de chargement et l'incrément pour passer 
d'une ligne à la suivante. Il ne lui reste 
plus alors qu'à créer le fichier HAIFA.EXEC, 


Une fois celui-ci créé, il suffit de faire 
EXEC HAIFA.EXEC pour introduire dans le 
programme Applesoft les instructions de 
chargement. Attention simplement à ne pas 


avoir de numéro de ligne commun entre celles 
du programme et celles apportées par le 





fichier HAIFA.EXEC, sous peine de faire 
disparaître celles du programme. On peut 
faire l'instruction EXEC avant de taper le 


præœramme Applesoft récepteur où pendant 
qu'on le tape ou encore après l'avoir tapé. 


pour ceux qui veulent faire "à la 

instructions de chargement, qu'il 
faut charger les tables avant les fichiers 
codes car ceux-ci ont été automatiquement 
sauvés à l'assemblage avec une longueur de 
$1000, plus grande que la longueur réellement 
utilisée, D'autre part, si jamais on termine 
le chargement par celui de la première partie 
du code (HAIFA.TXT ou HAIFA.TXT 2), il ne 
faut pas faire un BRUN, mais un BLOAD et un 
CALL: c'est un bug bien connu du DOS: il ne 
faut pas BRUNer les programmes qui changent 
les entrées/sorties. 


Notons, 
main" les 


HAÏFA.HGR SHAPES est une table de formes 
haute résolution contenant les caractères 
ASC11 de 33 à 95, qu'il est conseillé 
d'utiliser avec XDRAW et avec SCALE=-1. Le 
numéro de la f'orm est le caractère ASCII 
moins 32, 


HAIFA.CHARSET est une table de caractères 
haute résolution contenant les caractères 
ASCII standards. Pour son format, voir 
l'instruction & HGR PRINT. 


Les 
disquette 


autres programmes fournis sur la 

sont des programmes de circonstance 
destinés au générique de la disquette de 
Pom's numéro 5. Il sont repérés par le 
préfixe Pom's. 


ANNEXE 3 : LES REFERENCES 


HAIFA s'est inspiré de Call-Apple In Depth 
(Ai1 About Applesoft) pour les routines sui- 
vantes: & AT et & TO, & GOTO et & GOSUB, & 
SWAP, & CLEAR, & DEL, & INPUT, & CALL, & NEW, 
& PRINT USR et & REPT PRINT. 

HAIFA à utilisé NIBBLE EXPRESS 1 et 2 pour 
les instructions suivantes: & FRE, & STORE et 
& RECALL, & DUMP. 


HAIFA a imité la ROM Applesoft pour 
réaliser les routines suivantes: & PEEK et & 
POKE, & IF et & ELSE, & X HPLOT, & N HPLOT et. 


& IPLOT, & ONERR, & DRAW et & XDRAW, & GET et 
& INPUT. 

L'instruction & POP est tirée d'un jeu de 
la revue SOFTSIDE et & NOT est tout-à-fait 


classique. 
L'instruction & PLAY1 est tirée de pro- 
grammes diffusés par des groupements améri- 


cains et & PLAY2 est la routine de Electric 
Duet. 

L'idée de menu (& LET) a été ispirée par 
l'article envoyé à Pom's par Denis SUREAU et 
publié dans ce numéro. 

Les autres instructions, c'est-à-dire 
essentiellement les puissantes instructions 
graphiques, ont été conçues et réalisées 
spécialement pour HAIFA. ° 51 
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"Croque moi 











et tu inventeras. 


L'homme invente de plus en plus. Et de mieux en mieux. 
Pour repousser les limites du possible, il s’est fabriqué des outils à sa mesure. 
L'ordinateur personnel Apple en est un. 


Rappelez-vous. Il n’y a pas si longtemps, 
l'ordinateur personnel c'était un rêve. Aussi fou 
que de vouloir posséder son propre vaisseau 
spatial. 

Et puis il y eut Apple. 

L'informatique indépendante, abordable (un 
Apple coûte moins qu’un simple photocopieur) 
et accessible (on apprend à s’en servir en quelques 
heures). 

Un Apple ne vient jamais seul. Avec lui, vous 
disposez d'une bibliothèque de programmes avec 
lesquels vous pouvez vous mettre tout de suite au 
travail. Sans avoir à apprendre le langage 
informatique. 





Un Apple, c'est le meilleur moyen d'aller plus vite et plus loin. D’être créatif sans aucune contrainte. 
De regagner le temps perdu en tâches répétitives, en routine. D’aller jusqu’au bout de chaque nouvelle 
idée. De redevenir inventif à 100 %. 


Vous faut-il d’autres bonnes raisons? 






Alors, examinez une de vos Un Apple, c'est vrai, change les façons 


journées de travail, vous en BE de travailler,de penser, de décider. 
trouverez. Mais si vous savez déjà ee À vous de décider. 
qu’un ordinateur personnel peut RE — 
vous faire du bien, documentez-vous BON A CROQUER 
(voyez le bon à croquer Apple au bas : 
nn SR 
H . es VENUE QE céanie Z.l de Lourtabeu 
Et gardez bien en tête que votre 01944 LES ULIS cenex 


ordinateur personnel doit disposer de 
eue Be pour vos travaux 
abituels. Et qu’il doit être capable de 


[1 Que lire? Si vous voulez vous familiariser avec 
le monde de l'ordinateur personnel à travers la littérature Apple et les 
revues spécialisées, cochez cette case. 


ndir en fonction de vos besoins : 
(À le dispose de plus d'accessoires CR Linge 

PP P P à DSi vous ne pouvez plus attendre, cochez cette case pour recevoir la 
que n'importe quel autre ordinateur liste des revendeurs agréés Apple. 
personnel). Élis 


Choisissez aussi un ordinateur 
célèbre et qui a fait ses preuves : 
400.000 Apple fonctionnent chaque Adresse — —— 
jour dans le monde. C’est la 
meilleure preuve de leurs hautes # 
performances et la certitude d’un apple 
service disponible sur le champ. On « À 

l'ordinateur personnel 


ne devient pas célèbre par hasard. 


Société 











Création graphique en Pascal 


Michel Crimont 





Le Pascal offre de grandes possibilités de 


graphisme haute résolution; malheureusement, 
l'écriture des blocs utilisés par la procé- 
dure DRAWBLOCK est encombrante dans un pro- 
gramme et les dessins ne peuvent être utili- 


programme qui les crée, au fur 


besoins. 


sés que par le 
et à mesure des 


D'où l'idée de créer un fichier contenant 
des blocs prédessinés du type SYSTEM.CHARSET 
mais plus grands, que tout programme pourra 


venir lire pour en utiliser les graphismes. 


Le dessin se fera sur une grille de grande 
taille, chaque point H.R. étant représenté 
par un point de 8x8 que l'on peut allumer ou 
éteindre sur l'écran et qui, déplacé par les 
touches I-J-K-M, dessine les graphismes. Le 
dessin terminé est réaffiché dans sa taille 
réelle avant l'enregistrement. Il sera par 
ailleurs possible de relire 36 figures 


simultanément à l'écran pour choisir celles 
convenant à un programme donné. 


Les déclarations 


Const TAILLE-1}: les figures font 15x15, ce 
qui les rend faciles à tracer et n'empêche 
pas de les réunir par groupes de 10 pour de 
plus grands dessins. 


-Type: 

FORME-PACKED.ARRAY([0..taille,0:.taille] of 
booléen: image haute résolution 

CHOIDECA est un set de caractère 
POINT=PACKED.ARRAY[0..7,0..7] of Booléen est 
simplement le point grossi nécessaire pour 
dessiner, 


Les variables 


-IMAGE : variable de type FORME 
ALBUM fichier d'images. Les caractères 
sont ceux de la librairie courante pour les 


caractères de contrôle d'écran 

-NOM est celui du fichier contenant les ima- 
ges 

-DOT1, DOT2 et DOTN sont les points néces- 
saires pour dessiner 

-INDEX est le nombre d'images du fichier. 


Les procédures 


Les procédures MESSAGE, PRENRETURN, PREN- 
CAR,  PRENCHAINE, OUI et SELECT sont des pro- 
cédures courantes, déjà décrites dans les 


précédents numéros de Pom's. 
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les caractères de contrôle 
variables suivantes qui ser- 


INIT initialise 
d'écran et les 
viront à dessiner: 


DOT1 point de positionnement; 

DOT2 point blanc: 

DOTN point noir. 
NOMFICHIER prend le nom du fichier image au 
clavier. Si le numéro du drive, 4 ou 5, n'est 
pas précisé, ajoute 4 et place systé- 
matiquement le euffixe .PIC après le nom du 
fichier. La procédure essaie ensuite d'ou- 
vrir le fichier, Si elle le trouve, elle le 
lit en incrémentant l'index qui se trouve 


donc 
continuer à 
existant. Si 
chier est créé. 


sur la dernière image libre si l'on veut 
écrire dans un fichier pré- 
elle ne le trouve pas, le fi- 


GRILLE trace sur l'écran une grille de NX*NY 
de côté avec un espacement entre les "bar- 
reaux" de PASX et PASY. 


MARQUE place le point DT (noir ou blanc) aux 
coordonnées X, Y. 


ECRIMAGE est la procédure de dessin propre- 
ment dite. Appel de NOMFICHIER on prend le 
nom du fichier et on l'ouvre ou on le crée, 
ce qui en même temps positionne INDEX sur un 
endroit libre du fichier. La boucle REPEAT 
permet ensuite de créer successivement 
plusieurs dessins dans cette boucle. À chaque 
fois: 


.on efface l'écran (INITTURTLE) 

.on trace la grille (GRILLE) 

-on donne les indications pour dessiner: 

déplacement du curseur avec I-J-K-M pour 
haut-gauche-droite-bas, T pour Trace, O 

pour pas de Trace (effacer) et F (fin). 


On place le point en 0,0 c'est-à-dire en 
bas et à gauche de la grille, et l'on entre 
dans une autre boucle REPEAT jusqu'à ce que 
l'on tape F pour fin. Dans cette boucle, on 
trace le point en cours, soit DOT2 et IMAGE 
(Y.X)=-Vrai si TRACE est vrai, soit DOTN et 
IMAGE (Y.X)=Faux si TRACE est faux - ce qui 
assure la correspondance entre l'écran et le 
tableau de booléens représentant l'image. 


Le CASE DIR permet de reconnaître les di- 
verses commandes 
I pour monter (maximum TAILLE) 
K pour déplacer à droite (maximum TAILLE) 
M pour descendre (minimum 0) 
J pour déplacer à gauche (minimum 0) 









vrai 
faux 


T place Trace à 
O0 place Trace à 
DRAWBLOCK, une fois le "F" 
l'image en vraie grandeur pour 
la contrôler et, si on le désire, l'enregis- 
trer; il est ensuite possible d'interrompre 
l'écriture ou de continuer le processus avec 
un autre dessin. 


La procédure 
tapé, affiche 


AFFICHE est utilisé en lecture. La varia- 
ble IND numéro de l'image dans le fichier 
sert à positionner l'image sur l'écran dans 
l'une des 36 cases par calcul de POSY et 
POSX. IND est ensuite tra..formé en chaîne 
alpha et écrit comme numéro de l'image par le 
WSTRING. L'image elle-même est placée au 
numéro calculé par la procédure DRAWBLUCK. 


LIRIMAGE appelle de façon itérative AFF1- 


CHE pour afficher chaque fois une page de 36 
images. Pour cela, comme pour ECRIMAGE, cette 
routine demande le nom du fichier que l'on 
désire. INDEX est remis à U et le programme 
affiche successivement la grille et les 36 


images munies de leur numéro. 
Le corps du programme sélectionne simple- 
ment la fonction désirée lecture, écriture 


A 
ou arret, 


Utilisation dans un programme Pascal 





Le programme Pascal devra comporter en dé- 


claration 
USESTURTLEGRAPHICS 

CONST TAILLE=14 

TYPE FORME 

et VAR ALBUM FILE OF FORME 


Le fichier ALBUM ayant été créé préalable- 


ment sous le nom souhaité, par exemple APL- 
SET, le fichier APLSET.PIC doit être placé 
sur le même disque que le programme qui doit 


l'utiliser. 


Ce programme pourra donc simplement ouvrir 
le fichier et lire le caractère voulu, par 
exemple le sixième par: 

RESET( ALBUM, "'#*APLSET.PIC") 
SEEK( ALBUM, 6), GET(ALBUM) 
DRAWBLOCK( ALBUM ,....etc.) 


ou éventuellement 
tableau, par exemple $ 
EXPO:ARRAY[1..26] OF FORME 
tableau qui sera rempli par 
l'album 

SEEK( ALBUM, 1) 

FOR I:=-1 TO 26 DO 

Beg in 

GET(ALBUM) : EXPO[I]:-=ALBUM 

End 


définir préalablement un 


lecture de 


I1 suffira ensuite d'utiliser EXPO[X] dans 
la procédure DRAWRIOCK. Nous attendons avec 
impatience vos créations les plus réussies ! 


Une informatique de gestion adaptée aux besoins des gestionnaires et réalisée par des gestionnaires 


e opportunité d'utilisation de l'outil micro-informatique 
e intégration entre informatique traditionnelle et personnelle 
e politique de la communication dans l'entreprise 


e formation à l’utilisation de la micro-informatique 


e réalisation de programmes à la demande 


e livraison de systèmes clés en main, avec des progiciels de 
GESTION DE STOCK. PAYE. COMPTABILITE. 


Nous sommes gestionnaires avant d'être informaticiens L'informatique doit s'adapter à l'homme, et non l'inverse. 
L'outil micro-informatique répond particulièrement bien à ce souci de qualité et d'efficacité du travail, 
dans des conditions conviviales. 
Nombreuses références en informatique traditionnelle - divers matériels - et en informatique individuelle - principalement 
Apple - auprès des PME et des groupes industriels. 


logma s.a. Centre La Châtaigneraie - 29, avenue de Versailles - 78170 La-Celle-St-Cloud - Tél. : (3) 918.13.07 
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(x PROGRAMME DESTINE À DESSINER DES ELOCS 15X15 EN H,R4 X) 
(x$C (CC) M,.CRIMONT 20/08/80 x) 

(x$SS+X) 

FROGRAM EBASEGRAFHE ; 


USES TURTLECRAFHICS; 


CONST TAILLE =14; 
id = FORME =FACKED ARRAYCO,,TAILLE,0,,TAILLE] OF EOOLEAN; 
CHOIDECA =SET OF CHAR; 
FOINT =PACKED ARRAYL0O,,7,0,,71 OF EOOLEAN; 
VAR IMAGE FORME ; 
COM,HOME., 
ES, EOL;, SON; 
INV,NORM, CR: CHAR; 
NOM STRING; 
ALEUM $FILE OF FORME} 
DOTi,DOTZ2, 
DOTN :FOINT; 
INDEX #INTEGER} 


CXKKKEMKMEMEMEEEKREKEEEKEREEMMMMMMHMMMMOMM ) 


(x PROCEDURES HABITUELLES COURANTES x) 
CHOKNOMOK M NOMKKMHOKKMNCMOK I MOKKMMMOKKMOKKOKONOKOKKOKK ) 


PROCEDURE MESSAGE(X:INTEGER}S: STRING) } 
BEGIN 

COTOXY(0,X) ;HRITE(S,EOL ) 
END ; 


FROCEDURE FRENRETURN; 
VAR SORT: CHAR; 
EEGIN 
REFEAT 
READ(KEYEOARD ; SORT ) ; 
UNTIL EOLN(KEYBOARD) 
END ; 


FUNCTION PRENCAR(EONSET $ CHOTDECA ) $ CHAK$ 
VAR CH?CHARK; 
EON ; EBOOLEAN; 
BEGIN 
REFEAT 
READ(KEYEOARD , CH) ; 
IF EOLNCKEYEOARD) THEN CH$=CR}; 
EON?=CH IN EONSET; 
IF NOT BON THEN HRITE(CHK(7)) 
ELSE IF CH INLC* ‘4,271 THEN HRITEG(CH) } 
UNTIL EON; 
FRENCAR : =CH 
END} 


FROCEDURE FRENCHAINE (LONGMAX ; INTEGER ; EONSET ; CHOIDECA; VAR S3 STRING) ; 


VAR S1!ISTRINGC1]; 
CONT STRING} 
BEGIN 


Sit=” ’} 
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CONT!:=’";$ 
REFEAT 
IF LENCTH(CONT)=0 THEN S1LC1]:=PRENCARÇ(EONSET ) 
ELSE IF LENGTHC(CONT)=LONGMAX THEN S1L11:=FRENCAR(CCR, CHR(B8)1) 
ELSE S1L11;=FRENCAR(EONSET+CCK, CHRK(8) 1); 
IF SiLCi] IN EONSET THEN CONT:-=CONCAT(CONT,S1) 
ELSE IF S1L1]=CHR(B8) THEN 
ÉEGIN 
WRITE(ES,’ ’,ES); 
DELETE (CONT ,LENGTHÇCONT),1) 
END; 
UNTIL S1L1]=CR; 
S ;=CONT 
END ; 


FUNCTION OUI :EBOOLEAN; 
BEGIN 

OUT =FRENCAR(C’/0’,/N°1) IN C’0’7 
END ; 


FUNCTION SELECT(X:INTEGER?$S!STRINE $ EON CHOTDECA) {CHAR 
BEGIN 

MESSACE(X, S) ; SELECT : -FRENCAR(EON) 
END ; 


COHOMOMOKNC CHECK DC DCE CCD DC COCO DKCOKCHEOEHCHOE ) 
(X INIT DU FROGRAMME ET CREATION D'UN  %x) 
(x FOINT ELANC ET D'UN NOIR x) 
MCE COCHE DOC CCD DDC DC COCHE OC CODEC DE DCE OC KCDKKCOKCEOMOK ) 
PROCEDURE INIT; 
VAR I, + INTEGER; 
BEGIN 
HOME =CHR(27)$ EOL=CHR(29); ES f=CHR(8); 
SON :=CHR(7); INVS=CHRK(18); NORMi=CHRK(20); CRi=CHR(13); 
FOR Ii=0 TO 7 DO 
FOR J:=0 TO 7 DO 
BEGIN 
DOTICI,J]1?=FALSE ;DOT2CI,J]1:=TRUE; 
END; 
DOTN’=DOTi; 
FOR I5=2 TO 5 DO FOR Ji=2 TO 5 DO DOTICI,J]1:=TRUE; 
FOR I5=3 TO 4 DO FOR J5=3 TO 4 DO DOTILCI,J]:=FALSE}; 
END; 


CHHNOMMONMOKKOK KM MON OHCHKOKKOKOOKOKCOCOCHCOKOOOKOKKOKOKOKHOMONOK ) 
(x OUVRE LE FICHIER ALEUM X) 
OKON OKON DDC DC DC DCE OCDE DC DC DC OC OC CDKDCDCDCDCHC HEC HEC ) 
PROCEDURE NOMFICHIER; 
VAR EONSEO0OLEAN; 
BEGIN 
REFEAT 
PAGE (OUTPUT ) $ 
CLOSE (ALBUM) ; 
BON =TRUE ; INDEX 5 =0 ; 
REPEAT 
MESSACE(10,’NOM DU FICHIER!’); 
PRENCHAINE(13,L°0°,,°9",'A",,°Z","#",':"1,N0M); 
UNTIL NOM<%’’} 
IF FOS(’#’,N0OM)=0 THEN NOM!=CONCAT(’#4:,NOM) ; 
IF LENGTH(NOM)>13 THEN NOM; =COFY(NOM, 1,13) ; 
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NOM 3% =CONCAT (NOM,  ,.FIC’); 
CX$I-x) 
RESET (ALEUM , NOM) ; 
EON$=IORESULT=0 ; 
IF EON THEN 
BEGIN 
SEEK (ALEUM; INDEX ) ; GET (ALEUM) ; 
WHILE NOT EOFÇCALEUM) DO 
BEGIN 
INDEX =INDEX+1}; 
GET (ALEUM) 
END 
END ELSE 
BEGIN 
REWRITE (ALEUM ; NOM) ; 
EON=IORESULT=0 
END ; 
IF NOT EON THEN 
BEGIN 
WRITE (HOME ) ; 
GOTOXY(0,10) ;HRITE(SON, ‘TITRE QU LECTEUR NON VALIDE"); 


WRITE(’ FAITES, <RETURN* ‘) $ FRENRETURN; 
CLOSE (ALEUM) 
END 
CK$I+X) 
UNTIL EON 


END; 


CHOHOKMOK HUM KO OK DCE DCE HOKO NOK ) 
(x TRACE UNE GRILLE DE NXXNY AVEC LES x) 
(x PAS FASX,FASY X) 
CHOKIOKK HOKHMK MK HOMO OKI HOOK HOKOKMCK ) 
FROCEDURE GRILLE(NX,NY,FASX,FASY:INTEGER) ; 









VAR I tINTEGER 
BEGIN 
INITTURTLE ; ET CA, C'EST LA 
FOR I!'=0 TO NX+1 DO. VERSION AVEC LE 
BEGIN PASCAL ÉTENDU.. . 





PENCOLOR(NONE ) ; 
MOVETO(IXPASX, NYXPASY+PASY); 
FENCOLORÇ(HHITE) ; 
MOVETO(CIxFASX ; 0 ) 

END; 

FOR I5=0 TO NY+1 DO 

BEGIN 
FENCOLOR(ÇCNONE) ; 
MOVETO(D0,IXFASY) ; 
PENCOLORÇ(HHITE) ; 
MOVETOC(NXXPASX+FASX, IxXPASY) 

END 

END; 





CKAXAKMKKMMERMENERERENEEMNKKEEMENKENMNMMMK ) 
(x PLACE UN POINT ELANC OU NOIR EN X,Y x) 
4€ CCC DCI DEC DC OCDE DDC DC DC DC OCDE DC OCDE HEC OCDE CE ) 
PROCEDURE MARQUE (DT ; POINT ; X, Y : INTEGER) ; 
VAR TON tINTEGER} 
BEGIN 
DRAWEBLOCK(DT,2,0,0,7,7,Xx10+1,Yx10+1,10) 
END; 
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CHOMOMONOK HOME OOKONOKOK CON OKON OK OK HACOCOOKOOK OK OO OKON ) 


(x P 


ROCEDURE PRINCIPALE D’ECRITURE €) 


(* DES DESSINS SOUHAITES t} 
CHXAOINONNANMNMAMNMARANEARANENKENKNEMEARM A ) 


PROCEDURE ECRIMAGE ; 
VAR X,Y *INTEGER; 
DIR CHAR; 
TRACE t EOOLEAN; 
BEGIN 
NOMFICHIER; 
REFEAT 
FOR X#=0 TO TAILLE D0 FOR Y$=0 TO TAILLE DO IMAGELCX,Y]:=FALSE; 
INITTURTLE}; 


GRILLE(TAILLE, TAILLE,10,10); 
PENCOLOR (NONE ) ;MOVETO(0,181) ; FENCOLORÇ(WHITE) ; 
WSTRING(’DEFLACER LE CURSEUR AVEC LES TOUCHES"); 
FENCOLOR (NONE ) ;MOVETO(0,171) ; FENCOLORÇ(HHITE) ; 
HSTRING(/I=HAUT K=DROITE M=EAS J=GAUCHE"); 
FENCOLOR (NONE ) $MOVETO(0,161) ;FENCOLORÇ(HHITE) ; 
WSTRING(’F=FIN T=TRACE O=NOIR’); 
X:=0;Y:=0;MARQUE(CDOT1,X,Y) ; TRACE? =FALSE ; 
REFEAT 
DIR$=PRENCAR(C’'I’,'K’', Ms "d's°F's'T'#/0"1)}$ 
IF TRACE THEN 
BEGIN 
MARQUE(DOTZ,X;,Y); 
IMAGECY,X1:=TRUE 
END ELSE 
EEGIN 
MARQUE(DOTN,X,Y)} 
IMAGELY,X15=FALSE 
END; 
CASE DIR OF 
‘T'SBEGIN 
Yi=Y+1$IF Y>TAILLE THEN Y$=TAILLE;MARQUE(DOT1,X;,Y) 
END; 
‘’K'3BEGCIN 
Xi=X+1;IF X>TAILLE THEN X$=TAILLE;MARQUE(DOT1,X,Y) 
END; 
‘M'SBEGIN 
Yi=Y-1;IF Y<0 THEN Y5=0;MARQUE(DOTI,X;,Y) 
END; 
‘J’ BEGIN 
Xi=X-1;IF X<0 THEN X5=0;MARQUE(DOT1,X;Y) 
END; 
*T'{TRACES=TRUE; 
‘0’:TRACEi=FALSE 
END 
UNTIL DIR=’F’}; 
DRANBLOC(IMAGE,2,0,0,15,15,230,75,10); 
PENCOLOR(NONE ) $MOVETO(160,50) ; FENCOLOR(HHITE) ; 
WSTRING(’/ENREGCISTRER (O/N) ’)}; 
IF OUI THEN 
BEGIN 
SEEK(ALEUM, INDEX) ; ALEUMA$ =TMAGE ; PUT (ALEUM) ÿ INDEX : =INDEX+1 
END; 
MOVETO(160,50) $NSTRING(’CONTINUER ? (O/N) 


UNTIL NOT OUT; 
CLOSE (ALEUM, LOCK) 


END ; 
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€ HOME DEEE DE DCE DEEE DCO DC OCDE DOC DCE OC DC HO ) 
(x PLACE UN DESSIN DANS LA GRILLE X) 
CMCMCHEMEKE CHOCO DICO DOC DOC OK DOC DK OCDE OKCOKK HCHCK ) 
PROCÉDURE AFFICHE(DESSIN:FORME $ IND { INTEGER) ; 
VAR FOSX,FO0SY,I;INTEGER; 

NUM STRING; 


Ii=IND MOD 36; 
FOSY#=150-CCI DIV 6)x30);FOSX$=(I MOD 6)x45; 


STRCIND , NUM) 

F'ENCOLOR ( NONE ) ;MOVETO(FOSX+5,FO0SY+20) ; FENCOLOR(HHITE ) ; 
HSTRING (NUM) ÿ 
DRAWELOC(DESSIN,2,0,0,15,15,POSX+15,POSY+5,10) 


END ; 


CHOMCHOMKHCKKHK DK OK OK DK OKON OK OK OK OK KO OK OKCKOK OCR MON ) 
(x LECTURE D'UN FICHIER EXISTANT X) 
COMMON HOME HEC OCDE DDC DONC DK DK DK DK DICO CHOCO CHOCO ) 
FROCEDURE LIRIMAGE}; 
BEGIN 
NOMFICHIER$INDEX1#=0} 
MESSAGE(22,'TAPER <RETURN: FOUR LA GRILLE SUTUANTE’)/FRENRETURN}; 
CX$I-x) 
GRILLE(6,6,45,30); 
SEEK(ALBUM, INDEX) ; GET (ALEUM) ; 
WHILE NOT EOF(ALEUM) DO 


EECIN 
AFFICHE(CALEUMA,INDEX) $INDEX£=INDEX+1}; 


IF (INDEX MOD 36)=0 THEN 
BEGIN 
FRENRETURN; 
GRILLE(6,6,45;30) 
END; 
SEEK(ALEUM, INDEX) ; GET (ALEUM) 
END; 
PRENRETURN 
END ; 


CXHONOMOMONHKHCHK OKON OC CCDICOIKDIC DICO DE DDC DC DICO CO 


(X FROGRAMME FRINCIFAL x) 
CKOKKK MOCHE OK OKCDK OKON DO OO OH DK OKON OCOCOCOONC OKON ) 


BEGIN 
INIT; 
REPEAT 
FAGE (OUTPFUT ) ; 
TEXTMODE ; 
COM: =SELECT(0,’/EASEGRAFHE: L(IRE, E(CRIRE, QUITTER ? ’,C’L’,'’'E’, 
CASE COM OF ‘Q’1): 
‘L'$LIRIMAGE; 
‘E’ tECRIMAGE 
END; 
UNTIL COM=’Q" 
END, 
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CX Multigestion à l'essai 


Hervé Thiriez 





Objectifs du programme 





CX Multigcstion cst à de nom- 
breux titres un produit français fort origi- 
nal. Nous sommes tentés de reprendre, en 
pensant au système M/DUS (voir numéro 4) ou à 


Le programme 


CX Multigcstion, avec un ton parodiaque non 
dissimulé "En France, on n'a pas de micro- 
processeur, mais on a des idées ...". 


Le logiciel CX Multigestion est une base de 
données qui cache son nom; c'est d'ailleurs 
un produit hybride qui possède de nombreuses 
caractéristiques d'une base de données, mais 
pas toutes, et qui a été conçu dans une 
optique légèrement différente. Ce produit est 
le premier d'une famille dont le but est de 
former un ensemble cohérent suffisant pour 
aider à gérer, sans faire appel à d'autres 
logiciels, une PME/PMI. Cette ambition va 
jusqu'à l'intégration de traitement de texte 
en relation avec les fichiers définis et 
utilisés par la programme CX-Multigestion. 


CY Multigestion 

fiches, d'opérer des 
et des classements, 
certains calculs 
les fiches 


En quelques mots, vous 
permet de définir des 
recherches, des tris 
d'effectuer automatiquement 
sur Îles fiches, ou à travers 
sélectionnées, de fusionner des fichiers 
construits sur une base commune, et enfin de 
sortir des tLableaux (écran ou imprimante) ou 
des étiquettes. 


Création des fiches 


En quelques mots, ce logiciel permet de 
définir des fiches ayant un certain nombre de 


zones, chacune étant définie comme alpha- 
numérique, numérique ou date. Les différen- 
ces principales par rapport à la définition 


de zones dans la plupart des bases de don- 
nées sont les suivantes 


-la définition d'une zone "date! est assez 
flexible : 12 FEVRIER 1982, 12 FEV 82, 12 Fr 
82, 12 2 82, 12/21/82, 12-02-82, 12 2 ou 12 F 
(année définie par défaut) étant des repré- 


sentations reconnues et acceptées. 


-la définition d'un nombre possède aussi une 
flexibilité originale avec la reconnaissance 
des formes suivantes 1002.25 ou 1002,25 ou 
1002.25 ou 1002,25 ou 1002,25 F, Par contre, 
et là aussi la limitation revêt une certaine 
originalité, les décimales au-delà de la 
seconde sont ignorées,. 


a pas à définir de longueur maximale 
celle-ci est limitée d'office à 24 
cst par contre possible d'af- 


inférieure à la longueur 


-il n'y 
de zone 
caractères, Il 
fecter une limite 
d'unc zone. 


libellés sont obligatoirement limités à 
une longueur de 11 caractères, car une ligne 
d'écran est réservée pour chaque zone (enre- 
gistrement + texte + présentation). 


-les 


le plan technique, CX Multigestion gère 
tous ses pointeurs, et n'a pas 
de réserver une longueur fixe par zone 
les longueurs sont variables et la place 
occupée est directement fonction de l'infor- 
mation placée dans la zone. 


sur 
lui-même 
besoin 


On distingue deux types de dossiers 


“iossiers libres" formés de fiches li- 
bres correspondant à celles que l'on définit 
dans les bases de données habituelles, sous 
réserve des remarques que nous venons de 
faire dans les paragraphes précédents. On 
peut définir 45 zones par fiche, au rythme de 


1- les 


15 par écran; le quatrième et dernier écran 
(feuille de calcul) est réservé à la défi- 
nition de formules internes à la fiche et 


reliant diverses zones entre elles. 


2 les "dossiers nominatifs" comportent aussi 


trois écrans de données et un écran jouant le 
rôle de feuille de calcul. Le premier écran 
possède une structure prédéfinie, avec des 
rubriques classiques M/STE, NOM, PRENOM, 
ADR1, ADR2, CP-V, TEL1, TEL2 et trois lignes 
de notes. 

Pour tous les dossiers, libres ou nomina- 
tifs, un numéro de fiche est automatiquement 
attribué par le programme, par incrémenta- 


tion de 1 à chaque création. 
Recherche d'un dossier 


la recherche d'un dossier précis peut s'ef— 
fectuer de deux façons différentes, dont le 
choix est laissé à l'utilisateur soit à 
partir du numéro de la fiche (fourni par le 
programme), soit à partir de la première et 
de la deuxième clef de recherche (nom et 
prénom, pour un dossier nominatif). Îhne 
modification des paramètres du programme 
autorise, dans le cas d'un fichier libre, de 
considérer la première clef (ou la seconde) 
seule pour la recherche. 
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Deux inconvénients à ce mode de recherche : 


1- lors de la création, le programme ne véri- 
fie pas s'il existe déjà une fiche ayant les 
mêmes deux clefs (ou les mêmes nom et prénom, 
pour un fichier libre) que la fiche en cours 
de création. Il y a par conséquent risque de 
problème en création, mise à jour ou re- 
cherche. 


2=- le nom et le prénom doivent être écrits en 
entier, ce qui augmente sensiblement le 
risque d'erreur ou de perte de temps dans le 
cas des noms longs ou à représentations 
potentielles multiples (plus les problèmes 
dus aux fautes d'ortographe) ainsi JEAN 
DUPONT de sera pas reconnu dans la recherche 
de JEAN DUPOND, alors que le problème pour- 


rait être résolu par l'utilisation d'un 
caractère "wild card" avec par exemple JEAN 
DUPON?, le “"?" pouvant remplacer tout carac- 
tère. De même, une recherche sur J-F DUVI- 
VIER (pour citer une célébrité locale) ne 
donnera rien si l'on a créé une fiche J.-F, 
DUVIVIER, 

Une autre solution consiste à passer par un 
dossier de traitement pour effectuer la 


recherche. 


Sélection de fiches 


Nous sommes franchement plus positifs à 
l'égard de la façon dont CX Multigestion gère 
la sélection de fiches. Il est possible de 
sélectionner des fiches à partir de plusieurs 
clés simultanément, la sélection se réalisant 
à travers les modes suivants : 


- égalité, à partir de la gauche pour les 
zones alphanumériques "BA" sélectionnera 
toutes les fiches dont le texte dans la zone 


considérée débute par les lettres "BA 

- par analogie ou par mot-clef à l'intérieur 
d'une zone 

par différence 
tion par égalité) 
- avec indication de limites, qu'il s'agisse 
de limites de dates, numériques ou alphanu- 


mériques. 


(inverse du mode de sélec- 


Ces sélections sont superposables, le nom- 
bre total de critères de sélection devant 
rester inférieur ou égal à 12. Ainsi, on peut 
sélectionner toutes les fiches pour 
lesquelles le nom débute par une lettre de P 
à S, mais cela comptera pour deux critères 
sur les douze autorisées. Les numéros des 
fiches gardées au terme d'une sélection 
peuvent être mémorisés et servir de point de 
départ à une seconde et dernière sélection : 
on parvient ainsi à effectuer une sélection 
selon 24 critères. 


Classement des fiches 
est toujours possible d'effectuer, éven- 


en même temps qu'une sélection, un 
selon un ordre crois- 


Il 
tuellement 
classement des fiches, 
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ou décroissant, au choix. La principale 


sant 
limitation tient au fait qu'on ne peut simul- 


tanément demander une mise en réserve des 
numéros sélectionnés et un classement. 


part, on dispose seulement de UK en 
pour mémoriser les contenus des zones 


D'autre 
mémoire 


utilisées pour le classement, ce qui limite 
le classement direct à 500 fiches sur 3 
caractères, ou 300 fiches sur 8 caractères, 
compte tenu de la place nécessaire pour 
mémoriser les numéros des fiches. Cette 
difficulté peut Être tournée en opérant le 
classement en deux fois, chacun s'opérant sur 


la moitié du fichier, partitionné grâce à une 
sélection selon le critère de classement. 
L'utilisateur est prévenu par une sonnerie 
s'il dépasse le seuil de UK. Dans ce cas, son 


classement sera incomplet, et il devra le 
terminer. 
Les critères de sélection et, éventuelle- 


ment, de classement ou de réserve, peuvent 
être mémorisés dans un fichier de traite- 


ment. Il est ainsi possible de définir une 
fois pour toutes un certain nombre de clas- 
sements types qu'il suffit alors d'appeler 


par leur nom pour les exécuter. 


Modes d'impression 


principaux modes d'impression sont 
prévus. Le premier concerne la sortie d'éti- 
quettes, que l'on peut formater en indiquant 
les numéros et l'emplacement des diverses 
zones à sortir sur l'étiquette. L'autre mode 
d'impresion consiste à sortir un tableau dans 
lequel les zones sélectionnées pour l'impres- 
sion apparaissent en colonne. Il revient à 
l'utilisateur de choisir les zones et la 
longueur réservée à l'impression pour chaque 
zone (on peut imprimer seulement les n pre- 
miers caractères), sachant qu'il y a une 
limite à 80 ou 132 colonnes, selon l'impri- 
mante utilisée. 


Deux 


Les paramètres d'impression, comportant 
entre autres la définition des codes ASCII 
donnant éventucllement accès aux caractères 
compressés et allongés, sont placés dans un 
fichier se trouvant sur la disquette pro- 
gramme. Nous considérons qu'il s'agit là d'un 


choix qui n'est pas très heureux : 


1) Ce fichier est unique : quand l'utilisa- 
teur a accès à deux types d'imprimantes assez 
différentes, il doit redéfinir tous les 
paramètres chaque fois qu'il change d'impri- 
mante. C'est le problème que j'ai rencontré 
en voulant sortir des étiquettes sur une 
imprimante à aiguilles (carte parallèle), 
puis passer à une imprimante à marguerite 
(carte série) pour sortir des listes ayant 


une belle présentation. 


2) Le fait de devoir écrire sur la disquette 
programme chaque fois que l'on modifie les 






paramètres d'impression augmente le risque de 
voir cette disquette abimée; or, comme aucune 
disquette de back-up n'est fournie pour le 
moment, cela peut poser des problèmes à 
l'utilisateur. 


Fiches annexes 


Il est possible de définir des fiches ap- 
pelées ‘“annexes" selon le mode de défini- 
tion des fichiers libres. Ces fiches peuvent 
être fusionnées à la demande avec un fichier 
nominatif ou un fichier libre. Ainsi, un 
fichier "fournisseurs" (libre ou nominatif) 
pourrait être fusionné, selon le traitement 
que l'on désire effectuer, à un fichier 
annexe "articles" ou à un fichier annexe 
“bons de commande", 


Aspects ergonomiques 


CX Multigestion fonctionne à partir de me- 
nus. Le déplacement d'un écran à l'autre ou, 
à l'intérieur d'un écran, d'une zone à l'au- 
tre, la validation ou l'infirmation d'une 
information s'effectuent tous à l'aide de 
touches de contrôle groupées à gauche du 
clavier : Q, W, E, A, S, D, Z et X. Nous 
regrettons pour notre part que les standards 
implicites de nombreux progiciels ne soient 
pas respectés : RETURN pour valider une 
entrée, ESC pour l'infirmer, les flèches de 
gauche et de droite pour monter ou descendre 
d'une zone à l'autre dans l'écran. 


On peut se poser aussi une question, sur le 
mode humoristique. Le nom de la société ayant 
conçu ce programme est Contrôle X, ce qui 
signifie pour tout Appleomane annule ce qui 
précédait". Il s'agit là d'une ambition tout 
à fait compréhensible, mais alors pourquoi 
définir la touche CTRL-X dans le programme 
pour signifier "retour au menu précédent sans 
infirmation de ce qui vient de se passer! ? 


Implantation en mémoire centrale 


Une grande originalité de CX Multigestion 
tient au choix qui a été fait de mettre la 
quasi-totalité du programme en mémoire cen- 
trale, Ce programme comprend 15000 instruc- 
tions en assembleur, les dossiers et leurs 
pointeurs se trouvant entièrement sur dis- 
quette. Le nombre de fiches que l'on peut 
mettre sur une disquette dépend bien entendu 
du nombre des zones et de la longueur des 
informations placées dans chaque zone; on 
peut grosso modo placer de 200 à 2000 fiches 
sur une disquette. 


Tous les accès à la disquette ayant évi- 
demment été écrits directement à l'aide du 
RWNTS, les temps d'accès restent tout à fait 
acceptables : 


. temps 
seconde 
. temps de traitement, écoulé lors d'une sé- 


de recherche : environ 45 fiches par 


lection avant l'apparition du premier dossier 
sélectionné : 7 à 10 fiches par seconde; pour 
les suivants, il n'y a pas de délai sensible 
. temps de classement (sans calculs) : comme 
le précédent, mais nécessite auparavant une 
lecture complète de la disquette; il faut 
donc environ de 12 secondes pour classer une 
disquette de 100 fiches et 1 minute pour une 
disquette de 500. 

Comme vous pouvez le voir, il s'agit là de 
temps de réponse très satisfaisants. 


La documentation 


La documentation est bien présentée dans un 
dossier à spirales et à couverture rigide, 
selon la recette éprouvée par Visicalc. Elle 
est bien rédigée et présentée de façon agré- 
able, mais reste un tant soit peu confuse à 
l'utilisation. Il arrive souvent, quand on 
recherche une information précise, que l'on 
mette un certain temps avant de trouver l'en- 
droit où il en est question. D'autre part, 
fiche cartonnée aide-mémoire (comme celle 


une 

de Visicalc, par exemple) serait d'un grand 
intérêt - elle manque d'autant plus que le 
choix de touches de commande de CX 


Multisestion diffère des normes courantes. 
Conclusion 
Nous avons regretté 


. sur le plan ergonomique, le manque de co- 
hérence des touches de fonction avec les 
standards implicites des progiciels courants 

. sur le plan de la sécurité et de la flexi- 
bilité, le fait que les paramètres d'impres- 
sion se trouvent sur la disquette programme 

. au niveau de l'apprentissage, la nécessité 
de devoir consacrer une bonne journée à la 
maîtrise de l'outil 

. l'aspect monolithique des entrées et sor- 


tics : pas de définition possible de masques 
d'entrée (format unique), et seulement deux 
modes possibles de sortie sur imprimante (n 


colonnes ou étiquettes). 


Nous avons aimé : 


.la rapidité de fonctionnement 
.la sécurité de fonctionnement 
.la facilité de mise en place d'une applica- 
tion, une fois le modèle maîtrisé 
.la possibilité de classer ou de trier avec 
n'importe quelle rubrique comme critère 
.la possibilité d'ajouter ou d'enlever des 
rubriques à un fichier existant 

Nous attendons avec impatience de voir 
l'adaptation de ce système à des supports 
magnétiques de plus grande capacité et les 
nouveaux produits qui doivent être dévelop- 


pés autout de CX Multigestion, ce dernier 
n'étant que l'axe principal d'une famille de 
produits. 


Notre opinion générale est très favorable: 
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CX Multigestion un pro- 
points communs avec le 
système M/DOS. Dans les deux cas, l'utilisa- 
teur peut rapidement mettre au point des 
applications à base de gestion de fichiers 
d'une certaine complexité, et bénéficier d'un 


trouvons dans 


nous 
duit ayant certains 


traitement efficace. La différence tient 
principalement à la clientèle visée, M/D0S 
s'adressant aux concepteurs de programmes, 


alors que CX Multigestion est conçu pour être 
utilisé par des non-informaticiens (bien 
qu'il vaille mieux en être un pour bien 
définir la structure des fiches). 


NDLR : nous avons été récemment avertis que 
la version du programme devant sortir au 
SICOB a été améliorée pour tenir compte de 


nos remarques. 


Courrier 


des lecteurs 


L'utilisateur pourra maintenant utiliser 
dans une certaine mesure des touches clas- 
siques à la place des touches de contrôle. 

En outre, la nouvelle version permettra la 
mémorisation des paramètres d'impression sur 
la disquette données, au lieu de les enregis- 
trer d'office sur la disquette du programme. 


Enfin, la nouvelle documentation comportera 
une fiche finale aide-mémoire. 
Note sur 10 0 2 4 6 8 10 
Qualite de la documentation PÉRERTRE 
LEZ LS. 


Facilité d'apprentissage 
Variété des possibilités 
Rapidité de fonctionnement 
Sécurité de fonctionnement 
Aisance d'utilisation 


! 

! 

VO AAHRARARRAA 
! RERKERELEESX 
VO ARRKAREXX 

1 OHREXEX XX XX 


Prix public de CX-Multigestion 3500 FF. 





féliciter 
l'Apple, 
lement. 


Je profite de cette occasion pour vous 
enfin une revue spécifique de 
et en français; cela manquait cruel- 
Certes, Îles deux premiers numéros 
comportatent certains articles assez "hermé- 
tiques” pour la plupart des profunes, mais 
heureusement les notions de base sont vite 
venues au secours des gens en détresse! Je 
dirai même que c'est grâce à votre revue que 
J'at commencé à "manipuler" des programmes en 
langage machine et en assembleur, et que j'ai 
fait mes premiers pas dans ce domaine qui me 
paraissait bien mystérieux auparavant. 


Bravo aussi pour les bancs d'essai des uti- 
litaires et des cartes, qui permettent de se 
faire une idée avant d'acheter. Suggestion : 
vous devriez tester les différentes cartes 80 
colonnes, car 11 y en a tellement qu'on ne 
sait pas laquelle choisir... 


Les trucs et ustuces, enfin, sont une série 
de trouvailles toutes plus intéressantes les 
unes que les autres ... que demander de plus? 


... Une parution mensuelle, ou du moins 
bimestrielle ! Les lecteurs sont décidément 
insatiables 1 Mais il faut reconnaître que 


pour les possesseurs de l'Apple ne connais- 





sant pas l'anglais, votre revue est indispen- 
sable et irremplaçable ! Bonne continuation ! 


P.5. Voict une petite annonce - Vends carte 
SECAM 800 F (entrée par fil d'antenne TV). 


Dr. Antoine Migliore - 40 Bd. Auguste Ray- 
naud — 06100 Nice - Tel (93) 98.45.15 


nous fait très plaisir; nous 

général publier les lettres 
de peur que certains puissent 
croire que nous les écrivons nous-mêmes 
Mais nous n'allons pas vous priver de la 
publication de cette petite annonce ! 


Votre lettre 
n'osons pas en 
dithyrambiques, 





Cela fait deux fois que des personnes nous 
promellent un article comparatif sur les 
cartes 80 colonnes. Nous avons préféré ne pas 
trailer du sujel plutôt que de le faire de 
façon trop cursive; la publication d'un tel 
article reste un de nos objectifs; nous at- 
tendons de pouvoir le faire dans de bonnes 
conditions. 

Récent utilisateur d'un Apple II, je me 








suis abonné à Pom'e et je dois avouer que la 
majorité de son contenu passe bien uu-dessus 
de ma tête. Cependant, avec votre aide, je ne 
désespère pas de faire queîtques progrès dans 
l'avenir. 

Je me permets de vous faire parvenir un 
court programme sans prétention qui, avec la 
carte RVB Chat Mauve, permet de sélectionner 
simplement un fonctionnement en mode mono- 
chrome parmi les 15 couleurs possibles. 


ILIST 


1 HOME 
5  REM xxxPROGRAMME RVEXx#x 
6 REM 
7 REM ‘:: APPLE II + ::: 
B REM 125ET CARTE RVR::: 
9  REM 222 CHAT MAUVE 3:33: 
10 GR : HOME 
20 FEOR TT = © TO Si: COLOR= T / 2 
: VLIN 0,359 AT T + 33 NEXT 7 
Z53 PRINT " 1 5 D 7 3 
1i F5 297 
S5Q PRINT " 2 à 6 8 
10: 12 14”? 
40 PRINT "COULEUR (1-15) " 
45 INPUT C 
90 IF C >) = i AND CC = 15 THEN 
a5 
60 GOTO 25 
80 REM SELECTION COULEUR 
85 CO = Cici = CiCE = CiCS5 = C:E = 
C:CT = C 
30 GOSUE Z000 
95 TEXT : HOME 
100 HTAE 5: VTAEH Z: INVERSE 
110 IF C = 1 THEN PRINT "ÇC((RVE 
MAGENTA) »> )" 
1720 IF C = 7? THEN PRINT "Ç((RUE 
HLEU FONCE) » )" 
130 IF CO = 3 THEN PRINT "Ç(C{RVE 
VIOLET)})>)>" 
140 IF © = à THEN PRINT "{((CRVE 
VERT FONCE) }}" 
150 IF C = 5 THEN PRINT "(({RVE 
GRIS i>>)" 
160 IF € = 6 THEN PRINT "<Ç<C{RUH 
BLEU) } >" 
170 IF C = 7 THEN PRINT "Ç((RVE 
BLEU CLAIR) ))" 
18Q IF C = 8 THEN PRINT "((({(RVE 
MARRON) } } " 
190 IF C = 9 THEN PRINT "(((RVE 
ORANGE) } }" 
Z0Q0 IF CO = 10 THEN PRINT "({<RV 
BE GRIS Z))})" 
210 IF C = 11 THEN PRINT "(((RVU 
E ROSE})}}" 
220 IF C = 1Z THEN PRINT "Ç((RV 
B VERT CLAIR)))" 
230 IF C = 13 THEN PRINT "((C(RV 
B JAUNE) ))" 
24Q IF C = 14 THEN PRINT "Ç((C(RV 
B TURQUOISE) })" 
230 IF C = 15 THEN PRINT "(((RV 
B BLANC)})}": POKE — 16144,0 


300 NORMAL 


510 END 

2000 PBOKE — 16139, 16 # {15 — CT 
) 

2019 POKE = 14577 = B,15 — CO 

2020 POKE -— 14561 -— B,15 — Ci 

2050, POKE - 14545 = B,15 — C2 

ZO040 POKE — 14529 - B,15 -— CS 

2050 POKE — 16131,16 # (15 -— CT 
) 

2060 RETURN 


Dr. J-F Schuartz —- 54300 Lunéville 


bien conscients 
articles sont d'un niveau difficilement 
accessible au néophyte. Dans la mesure où 
nous nous adressons à tous les utilisateurs 
francophones d'Apple, nous sommes en effet 
tenus de panacher le niveau des articles afin 
que chacun y trouve à boire et à manger, Nous 
n'avons pas eu la place de mettre dans ce 
numéro un article de la série sur les notions 
de base cela reprendra cependant dès le 
prochain numéro, ainsi que la série sur 
l'apprentissage de l'assembleur, si elle nous 
parvient à temps ... 


Nous sommes que certains 


L'imprimante étant absente de mon système 
micro-informtique, je prends la liberté de 
vous écrire à la main. D'abord : BRAVO ! Oui, 
Je tenais à vous féliciter pour l'idée, la 
réalisation et la parution de votre revue. 
Vous pouvez croire que si un flemmard du 
stylo comme mot prend la peine de vous l'é- 


crire, c'est que vous l'avez vraiment mérité. 
J'ai pris connaissance de Pom's denuis peu, 
et je me suis régalé. Voici enfin la lecture 
saine, instructive et exclusive que ne pou- 
vatent  qu'espérer tous les passionnés de 
l'Apple. Je m'initie à cette bête de machine 


depuis près d'un an, et j'ai l'impression 
d'avoir encore pas mal à en tirer. 


Brièvement, mi petite critique de Pom's. 
. les points positifs : 
la présentation : +++ 
les programmes : ++++ (par leur choix, 
leur essence et leur composition 
le titre : +##+ (peut-être pas original, 
mais évident !) 
la lisibilité des Listings : +##++ (sauf 
pour la lettre D dans les listes en 
nexa qui ressort comme un C) 
. Les points négatifs (eh oui) 
la longueur de la revue, par conséquent 
son épaisseur (on reste sur sa faim) 
les intervalles de parution (trop longs) 
les explications de ce que fait le pro- 
gramme, parfois assez succintes. 


Pour conclure, je reviendrai sur les pro- 
grammes en Applesoft, qui pour certains sont 
composés de manière plus que claire, et 
surtout astucieuse. J'apprécie beaucoup les 
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logiciels faisant preuve d'astuce de la part 
sont-ils des 


du programmeur. Ces gens-là 
professionnels, ou de simples amateurs comme 
mot ? 


Dimitri Auer - 68130 Wittersdorf 


Nous avons déjà résolu en partie le pro- 
blème de l'importance de la revue depuis le 
numéro 4 : nous réduisons maintenant le tex- 


te, ce qui nous a fait gagner l'équivalent de 
10 pages de texte. Nous ne pouvons hélas pas 


Bibliographie 





1. Les éditions Radio viennent de sortir plu- 
sieurs ouvrages intéressants et présentés de 


façon agréable : 


de H. Lilen, 176 vages - 


Initiation BASIC, 
mais avec les exemples en 


D'intérêt général, 
BASIC Microsoft. 
Pratique de l'Apple II, de H. Lilen, 192 pa- 
ges - 80 FF - Très clair. 


BASIC, de Lon Poole, Mary Bor- 


70 programmes 
198 pages - 85 FF 


chers et David Castlewitz, 





encore augmenter la fréquence; il nous faut 
pour cela passer le cap des 2000 abonnés. 


tous les articles des deux 
numéros étaient des professionnels. 
de plus en plus de contribu- 
fait que plusieurs de nos 
sont des amateurs: c'est en 
particulier le cas d'Olivier Herz à qui nous 
devons HAIFA et de Denis Sureau (le clavier 
magique et la programmation facilitée). 


Les auteurs de 
premiers 
Nous recevons 
tions, ce qui 


auteurs actuels 


- Pourquoi ne pas fournir la disquette en 
option ? 

Manuel de l'utilisateur Apple II, de Lon Poo- 
le, Martin MceNiff et Steven Cook, 367 pages - 
95 FF - Assez complet, mais moins distrayant 
à lire. 

2. Les éditions du PSI vous offrent deux 


nouveaux titres : 


La comptabilité sur Apole, de S. et G. Llilio 
- 95 FF - Sort au SICOB. 


La pratique du Visicalc sur Apple, de Hervé 
Thiriez - Prix et nombre de pages inconnus au 
moment de la rédaction de Pom's - Comporte de 
nombreux exemples d'applications, allant de 
l'initiation à Visicalc aux astuces profes- 
sionnelles de création de tableaux. Sort au 
SICOB, 


(= 


BULLETIN D'ABONNEMENT 
Je désire recevoir le N° ., de POM'S 


[] avec disquette 





] sans disquette 
Je désire m'abonner pour 4 numéros 


à partir du N°, 


[] avec disquette 
[] sans disquette 


Nom 


295 F TTC 
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DOCUMENT 


ESSENTIEL 


GUIDE 82-83 


, L'ORDINATEUR! 
NDIVIDUEL. 


PAPY EUR AU SOMMAIRE 
ss e Panorama des ordinateurs valant 


entre 250 et 60 000 FF (plus de 120 matériels). 
e Panorama des imprimantes valant 
moins de 20000 FF (plus de 70 matériels). 
« Réactualisation de 12 bancs d'essai 
parus dans l'OI. 
« Annuaire des fournisseurs (plus de 700 adresses). 
e Annuaire des clubs (plus de 200 adresses) 
e Dictionnaire de l'informatique individuelle. 
e Le point sur les nouveautés parues 
depuis l'été 198]. 
« Et une série d'articles pour vous “guider” 
sur le chemin de 
votre informatisation individuelle. 




































à partir 
du 10 septembre 1982 
30FF 
chez votre marchand 
de journaux 


Pour recevoir, chez vous le 

Guide 82 83 dès sa parution, il vous 

suffit d'envoyer vos _. LE -<liisué 

ainsi qu'un Chèque de 3 

L'ORDINATEUR INDIVIDUEL | GUDE 82-83) 
41 rue de la Grange-aux-Belles 

75483 Pans Cedex 10 


Une réduction de 5FF est accordée aux abonnés 
sur envoi de la dernière étiquette d'expédition 





Erratum du N° 5 (paru dans le N° 6) 


1. Le clavier magique 


Page 4, colonne ?, ligne 4, il faut lire : 
++ <DEPART >, <INCREMENT >. 


2. La programmation 
facilitée 
Page 23, colonne 2, lignes 6 et 7, lire : 
X << 128 diminue la durée, X > 128 
augmente. 
15 lignes plus bas, lire « affichant 
PRINT EN ARR(X) » 
Afin de formater un écran entier avant 
de placer les INPUT et de créer une 
commande de formatage pur, il suffit 
de quelques instructions en plus et de 
créer une commande d2 formatage 
pur. On supprime « INPUT A$ » et le 
paramètre longueur devient obliga- 
toire, car le « 1 » servira à identifier la 
commande. Il faut pour cela : 
— Modifier les lignes suivantes : 

72 LDY #0 

73 STY LONGUEUR 

74 STY $6 
123 REQ MASQUE 
— Insérer les lignes suivantes . 

54 CMPÆ°T 

55 BEQ INPUT 


75 PHA 
76 CMP #°1 
77 BEQ INPTL 


115 DEC $BF 
122 INC $BF 


137 MASQUE PLA 
138 CMP ‘1 
139 BEQ GTRTS 


3. HAIFA 


Page 35, col. 2, 8 3, ligne 5, lire 
« # SAS ». 


Paragraphe suivant, lignes 4 et 5, lire 
« fait un bip, déconnecte les routines 
spéciales d’entrée/sortie, puis la répro- 
grammation de HAIFA intervient — le 
RESET agit comme CTRL-C: ïü 
fait”. 


Page 36, la pile. Lire PUSH > et 
PULL > (pas de signe “ =”). 

Page 36, à propos de & GOTO, & 
GOSUB, & RESTORE et & NEW : 
comme on peut utiliser des expressions 
numériques à la place des nombres, il 


vaut mieux ne plus utiliser le RENUM- 
RER ! 


Page 37, le « INPUT anything ». Une 
propriélé supplémentaire à élé omise . 
& INPUT « [chaîne] » : [nom de varia- 
ble], [exp. num.] 

& INPUT [nom de variablel, lexp. 


num.]. 


Ces commandes agissent comme & 
INPUT, mais ajoulent derrière le cur- 
seur un nombre de points correspon- 
dant à l'expression numérique (de 1 à 
255). Ce nombre de points indique la 
longueur maximale de la chaîne autori- 
sée : en cas de dépassement, la chaîne 
sera tronquée en conséquence. 

Page 42, bas de colonne 1 : letype 9 a 
pour effet « TE ». 

Page 43, col. 1, $6, lignes 6 et 7 : 
.….« <<» pour la gauche, « 3 » pour 
la droite… 

Page 43, tracer des points et des droi- 
tes : le HPLOT, le X HPLOT et le N 
HPLOT peuvent être prolongés par 
chacune des continuations {ex.1]. 
[ex.2] ou TO [ex.1], [ex.2] ou ON 
[ex.3]. 

Page 45, col, 2, 54, lire PR# et IN# 
au lieu de PR= et IN=. 


Page 46, $2 et page 47, ligne 1, lire 
CTRL-SHIFI-N au lieu de CTRL-%. 
Page 46, dernier 8, lire CTRL-SHIFT- 


P au lieu de CTRL-à. 
Adresse des routines : GETLIN 
($FD6A), RDKEVY(SFDOC) et 


COUT1($FDFO). 


Page 48, col. 2, 84, ligne 1 : « Cette 
routine court-circuite l'entrée de » ; 
ligne 9 : lire PRINT CHR$(4)« IN 
0 » : « IN » et non « PR ». 

Page 51, col, 2, 82: ligne 3: 
« tables après les fichiers » :, ligne 
9 : « du code (HAÏIFA.CODE en 48K 
ou HAIFA. CODE 1 en 64K), il ne ». 


Remarques sur 
la disquette Pom's 5. 


Le programme source est constitué de 
deux fichiers LISA 2.5 version 64K 
enchaïnés par ICL car l'ensemble était 
trop gros pour tenir en mémoire en un 
seul fichier. L'assemblage de ces 
fichiers sauve automatiquement les 
deux fichiers source. Là encore, il fallait 


deux fichiers distincts car LISA ne laisse 
que 4K pour le fichier généré. 
L'assemblage des deux versions de 
HAIFA (48K et 64K) a été réalisé avec 
LISA en version 64K. Pour pouvoir lis- 
ter les fichiers avec LISA 48kK, il a fallu 
découper HAIFA.TEXT 1 et HAÏIFA. 
TEXT 2 en deux parties chacun (suf- 
fixes À à D). Ces quatre fichiers 
s'enchaînent avec ICL, mais ne sont 
pas assemblables en 48K car la table 
des symboles est saturée. 


Celle-ci à en effet une longueur de 
$800 en LISA 48K et de $1500 en 
LISA 64K. HAIFA est donc beaucoup 
trop gros pour être assemblé en 48K ! 


4. Conversion Pascal/ 
BASIC/Pascal 


Nous adressons nos excuses aux lec- 
teurs ayant essuyé des difficultés lors 
de l’utilisation des programmes de 
conversion Pascal/BASIC/Pascal, 
fournis avec les disquettes Porm's 2 
à 4, et commentés dans le 
numéro 3. 


Pour ceux d'entre vous qui reçoivent 
les disquettes, utilisez le programme 
de transfert de BASIC vers Pascal de 
la disquette Pom's 5, dans laquelle 
le bug avait été corrigé, ou celui de la 
disquette 6, bien entendu. 

Ce bug avait été malheureusement 
absent de nos essais, dans lesquels 
nous avions remis les programmes 
sur une disquete Pascal vierge. La 
conséquence du bug est qu'une par- 
tie du programme Pascal risque 
d’être absente en fin de course. 

Le remède est le suivant, à appliquer 
aux programmes présentés par Gil- 
les Mauffrey dans le Pom's 3 : 


1. Dans PASCBAS.OBJO, 
288, lire CMP # $10. 


Donc, dans le code objet, faire 
AE3 : 10. 


2. Dans BASPASC.OBJO (sur dis- 
quette uniquement), ligne 449, lire 
CMP #5$10. 


Donc, dans le code objet, faire 


C29 : 10. 


3. Avant toute utilisation, nettoyer la 
mémoire avec : 

2000 : 0 

2001< 2000 . 8000 M. 


ligne 





